#ELSE( -- ) [FTH] => "FORTH"
The implementation of #ELSE is done in C for speed and
being less error prone. Better use the ANSI-compatible
[IF] [ELSE] [THEN] construct.
immediate code = [p4_sh_else]
#ENDIF( -- ) [FTH] => "FORTH"
end of #IF #IFDEF #IFNOTDEF and #ELSE contructs
(a dummy word that does actually nothing, but #ELSE may look for it)
immediate code = [p4_sh_endif]
#IF( -- C: state-save-flag mfth-if-magic S: ) [FTH] => "FORTH"
prepares for a following #IS_TRUE or #IS_FALSE,
does basically switch off compile-mode for the enclosed
code.
better use the ANSI style [IF] [ELSE] [THEN] construct.
immediate code = [p4_sh_if]
#IFDEF( "word" -- ) [FTH] => "FORTH"
better use [DEFINED] word [IF] - the word [IF]
is ANSI-conform.
immediate code = [p4_sh_ifdef]
#IFNDEF => "FORTH"
(no description)
immediate code = [p4_sh_ifnotdef]
#IFNOTDEF( "word" -- ) [FTH] => "FORTH"
better use [DEFINED] word [NOT] [IF] - the word [IF]
and [ELSE] are ANSI-conform, while #IFDEF #ELSE are not.
immediate code = [p4_sh_ifnotdef]
#IS_TRUE( C: state-save-flag mfth-if-magic S: test-flag -- ) [FTH] => "FORTH"
checks the condition on the CS-STACK.
Pairs with #IF
better use the ANSI style [IF] [ELSE] [THEN] construct.
immediate code = [p4_sh_is_true]
#IS_FALSE( C: state-save-flag mfth-if-magic S: test-flag -- ) [FTH] => "FORTH"
checks the condition on the CS-STACK.
Pairs with #IF
better use the ANSI style [IF] [ELSE] [THEN] construct.
immediate code = [p4_sh_is_false]
#DEFINE => "FORTH"
(no description)
primitive code = [p4_sh_define]
#PRAGMA => "FORTH"
(no description)
primitive code = [p4_sh_pragma]