(MARKER)
create a named marker that you can use to FORGET ,
running the created word will reset the dict/order variables
to the state at the creation of this name.
: (MARKER) (CREATE) HERE , GET-ORDER DUP , 0 DO , LOOP etc...
DOES> DUP @ (FORGET) CELL+ DUP CELL+ SWAP @ SET-ORDER etc...
;
|
core ordinary primitive |