|
- ( ';' can't have its name right away because, when created, it
- is not an IMMEDIATE yet and will not be treated properly by
- xcomp. )
- : _
- ['] EXIT ,
- R> DROP ( exit : )
- ; IMMEDIATE
- : ['] ' LITA ; IMMEDIATE
- ';' X' _ 4 - C! ( give ; its name )
- ':' X' _ 4 - C! ( give : its name )
- '(' X' _ 4 - C!
-
-
-
-
|