Return to cross.fs CVS log | Up to [gforth] / gforth |
version 1.7, 1994/07/08 15:00:30 | version 1.8, 1994/07/13 19:20:59 |
---|---|
Line 350 VARIABLE ^imm | Line 350 VARIABLE ^imm |
^imm @ @ dup <imm> = ?EXIT | ^imm @ @ dup <imm> = ?EXIT |
<res> <> ABORT" CROSS: Cannot immediate a unresolved word" | <res> <> ABORT" CROSS: Cannot immediate a unresolved word" |
<imm> ^imm @ ! ; | <imm> ^imm @ ! ; |
: restrict ; | : restrict 40 flag! ; |
>CROSS | >CROSS |
\ ALIAS2 ansforth conform alias 9may93jaw | \ ALIAS2 ansforth conform alias 9may93jaw |