FORGET FM/MOD FORTH #DEFINE
FORGET
* FORGET ( "word" -- )
 simulate:
   : FORGET  [COMPILE] '  >NAME (FORGET) ; IMMEDIATE

tools ordinary primitive