version 1.182, 2012/05/09 22:23:52
|
version 1.183, 2012/08/27 13:33:48
|
Line 2057 $20 constant restrict-mask
|
Line 2057 $20 constant restrict-mask
|
<res> <> ABORT" CROSS: Cannot immediate a unresolved word" |
<res> <> ABORT" CROSS: Cannot immediate a unresolved word" |
<imm> ^imm @ ! ; |
<imm> ^imm @ ! ; |
: restrict restrict-mask flag! ; |
: restrict restrict-mask flag! ; |
|
: compile-only restrict-mask flag! ; |
|
|
: isdoer |
: isdoer |
\G define a forth word as doer, this makes obviously only sence on |
\G define a forth word as doer, this makes obviously only sence on |