17 [a-z]+ => { prints "word\n"; };
18 [0-9]+ => { prints "num\n"; };
19 [\n ] => { prints "space\n"; };
23 [a-z]+ => { prints "word (w/lbh)\n"; fexec tokend-1; fgoto other; };
24 [a-z]+ ' foil' => { prints "word (c/lbh)\n"; };
25 [\n ] => { prints "space\n"; };
26 '22' => { prints "num (w/switch)\n"; };
27 [0-9]+ => { prints "num (w/switch)\n"; fexec tokend-1; fgoto other;};
28 [0-9]+ ' foil' => {prints "num (c/switch)\n"; };
29 '!';# => { prints "immdiate\n"; fgoto exec_test; };
33 [a-z]+ => { prints "word (w/lbh)\n"; fhold; fgoto other; };
34 [a-z]+ ' foil' => { prints "word (c/lbh)\n"; };
35 [\n ] => { prints "space\n"; };
36 '22' => { prints "num (w/switch)\n"; };
37 [0-9]+ => { prints "num (w/switch)\n"; fhold; fgoto other;};
38 [0-9]+ ' foil' => {prints "num (c/switch)\n"; };
39 '!' => { prints "immdiate\n"; fgoto exec_test; };