DO-ALL-WORDS DO-ALL-WORDS-WHILE DO-SYNONYM
DO-ALL-WORDS
* DO-ALL-WORDS ( wordlist* -- )


EXECUTE each entry in the wordlist in the reverse order defined 
 : DO-ALL-WORDS
      0 FIRST-NAME
      BEGIN ?DUP WHILE 
         DUP NAME> EXECUTE
         NAME-NEXT
      REPEAT
 ;
to run the NEW-WORDLIST in original order, use REDO-ALL-WORDS

EXTENSIONS chainlist ordinary primitive