src/lib_9_vocab.4th

   1 \ Vocabulary management
   2
   3 : FORGET
   4         BL WORD FIND >LFA   ( find the word, gets the dictionary entry address )
   5         DUP @ LATEST !      ( set LATEST to point to the previous word )
   6         H !                 ( and store H with the dictionary address )
   7 ;
   8
   9 : HIDE
  10         BL WORD FIND DROP >NAME
  11         DUP @ F_HIDDEN OR SWAP !
  12 ;