diff options
Diffstat (limited to 'src/interp/preparse.lisp.pamphlet')
| -rw-r--r-- | src/interp/preparse.lisp.pamphlet | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/interp/preparse.lisp.pamphlet b/src/interp/preparse.lisp.pamphlet index 12229874..55eb34d9 100644 --- a/src/interp/preparse.lisp.pamphlet +++ b/src/interp/preparse.lisp.pamphlet @@ -72,7 +72,7 @@ PURPOSE: BOOT lines are massaged by PREPARSE to make them easier to parse: <<*>>= <<license>> -(provide 'Boot) +(IMPORT-MODULE "fnewmeta") (in-package "BOOT") @@ -105,6 +105,10 @@ PURPOSE: BOOT lines are massaged by PREPARSE to make them easier to parse: (initialize-preparse in-stream) (do ((lines (PREPARSE in-stream) (PREPARSE in-stream))) ((null lines))))) T) + + +(defvar $skipme) +(defvar $COMBLOCKLIST) (defun PREPARSE (Strm &aux (stack ())) (SETQ $COMBLOCKLIST NIL $skipme NIL) |