0716B |
IDUP
|
( → )
Pushes interpreter pointer into the return
stack.
|
071A2 |
BEGIN
|
( → )
Pushes interpreter pointer into the return
stack.
|
071AB |
AGAIN
|
( → )
Sets the interpreter pointer to the topmost
value in the return stack, without popping
it.
|
071E5 |
REPEAT
|
( → )
Sets the interpreter pointer to the topmost
value in the return stack, without popping
it.
|
071C8 |
UNTIL
|
( flag → )
If FALSE then <REF>AGAIN, otherwise
<REF>RDROP .
|
633C6 |
NOT_UNTIL
|
( flag → )
NOT then <REF>UNTIL .
|
62B6F |
#0=UNTIL
|
( # → # )
Actually, should be called DUP#0=UNTIL.
|
071EE |
WHILE
|
( flag → )
If TRUE does nothing, otherwise <REF>RDROP then
<REF>2SKIP .
|
633DF |
NOT_WHILE
|
( flag → )
NOT then <REF>WHILE .
|
633F8 |
DUP#0<>WHILE
|
( # → )
Try to guess what it does.
|