* IMMEDIATE-MASK ( -- bit-mask ) returns the bit-mask to check if a found word is immediate (use in conjunction with >NAME-FLAGS@ and NAME-FLAGS! ) " my-word" FIND-NAME IF NAME-FLAGS@ IMMEDIATE-MASK AND IF ." immediate" THEN ELSE DROP THEN
IMMEDIATE-MASK
( -- bit-mask )
>NAME-FLAGS@
" my-word" FIND-NAME IF NAME-FLAGS@ IMMEDIATE-MASK AND IF ." immediate" THEN ELSE DROP THEN
header ordinary constant