![]() ![]() | ![]() |
version 1.2, 1994/05/18 17:30:03 | version 1.3, 1994/06/17 13:28:33 |
---|---|
Line 21 INCLUDE look.fs | Line 21 INCLUDE look.fs |
: var? ( nfa -- flag ) | : var? ( nfa -- flag ) |
(name>) | (name>) |
>code-address ['] leavings >code-address = ; | >code-address ['] udp >code-address = ; |
: con? ( nfa -- flag ) | : con? ( nfa -- flag ) |
(name>) | (name>) |