Interface for qBeta module object
QBETA: obj
%requires BETA
%visible BETA
NewSyntaxIndexed:
%globals
%basic
%public
in range: var Integer
elm:< Object
length:
out res: var integer
put:at:
%basic
get:
%basic
out V: var integer
@put::at:
%basic
in put: ref elm
in at: var integer
@get::
%basic
in get: var integer
out V: var integer
@getV::
%basic
in getV: var integer
out V: var elm
asString:
%basic
if:then:
%globals inSub
if:then:else:
%globals inSub
restart:
%basic
leave:
%basic
for:to:repeat:
%globals inSub
inx: var integer
doIt: