#IS_TRUE #IS_FALSE #PRAGMA
#IS_TRUE
* #IS_TRUE ( flag -- )
              ( state-save mfth-if-magic flag -- )
checks the condition on the CS-STACK.

Pairs with #IF

better use the ANSI style [IF] [ELSE] [THEN] construct.

FORTH/BASE cdecl immediate primitive