===== Interpreter =====

^ [[.:interpreter:tick|']]      |( "<spaces>name" --- xt )|
^ [[.:interpreter:paren|(]]      |( "xxx<paren> --- )|
^ [[.:interpreter:to_body|>BODY]]  |( xt --- a-addr )|
^ [[.:interpreter:to_in|>IN]]    |( --- a-addr )|
^ [[.:interpreter:char|CHAR]]       |( "<spaces>name" --- char )|
^ [[.:interpreter:ENVIRONMENT_question|ENVIRONMENT?]]    |( c-addr u --- false ) oder ( c-addr u -- i*x true )|
^ [[.:interpreter:EVALUATE|EVALUATE]]        |( i*x c-addr u --- j*x )|
^ [[.:interpreter:FIND|FIND]]            |( c-addr --- c-addr 0 )|
|                     |oder ( c-addr ---  xt 1  )|
|                     |oder ( c-addr ---  xt -1 )|
^ [[.:interpreter:HERE|HERE]]            |( --- addr )|
^ [[.:interpreter:QUIT|QUIT]]            |( --- ) und ( R:  i*x --- )|
^ [[.:interpreter:SOURCE|SOURCE]]          |( --- c-addr u )|
^ [[.:interpreter:STATE|STATE]]           |( --- a-addr )|
^ [[.:interpreter:WORD|WORD]]            |( char "<chars>ccc<char>" --- c-addr )|