aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/recognizer.frt
blob: 87e812a60d7b8bffe9c45690e1c912032f463ab1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
\ common recognizer words
\
\ platform specific code, selected via include directory
\ #include recognizer-arch.frt
\
\ build the methods table for a recognizer
: dt:token: ( interpret-xt compile-xt postpone-xt "name" -- )
   create swap rot , , , 
;

\ get and set the stack content
: set-recognizers forth-recognizer set-stack ;
: get-recognizers forth-recognizer get-stack ;

\ usage see Recognizer Recipes