Return to debug.fs CVS log | Up to [gforth] / gforth |
version 1.1, 1994/02/11 16:30:45 | version 1.3, 1995/11/02 14:20:52 |
---|---|
Line 262 VARIABLE Unnest | Line 262 VARIABLE Unnest |
THEN | THEN |
AGAIN ; | AGAIN ; |
: dbg ' NestXT ?EXIT (debug) ; | : dbg ' NestXT ?EXIT (debug) Leave-D ; |
: test 1 2 4 swap dup . ; | \ : test 1 2 4 swap dup . ; |