diff options
Diffstat (limited to 'src/interp/setq.lisp')
-rw-r--r-- | src/interp/setq.lisp | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/src/interp/setq.lisp b/src/interp/setq.lisp index abda3b8f..ef10bad7 100644 --- a/src/interp/setq.lisp +++ b/src/interp/setq.lisp @@ -46,33 +46,6 @@ (defvar MARG 0) ;" Margin for testing by ?OP" -(SETQ |$returnNowhereFromGoGet| NIL) - -(SETQ |S:SPADTOK| 'SPADSYSTOK) -(SETQ RLGENSYMFG NIL) -(SETQ RLGENSYMLST NIL) -(SETQ XTOKENREADER 'SPADTOK) -(SETQ OPASSOC NIL) -(SETQ SPADSYSKEY '(EOI EOL)) - -;; These are for the output routines in OUT BOOT - -(SETQ $MARGIN 3) -(SETQ *TALLPAR NIL) -(SETQ ALLSTAR NIL) -(SETQ COLON ":") -(SETQ COMMA ",") -(SETQ DASH "-") -(SETQ DOLLAR "$") -(SETQ EQSIGN "=") -(SETQ LPAR "(") -(SETQ MATBORCH "*") -(SETQ PERIOD ".") -(SETQ PLUSS "+") -(SETQ RPAR ")") -(SETQ SLASH "/") -(SETQ STAR "*") - ;; These were originally in INIT LISP (SETQ |$functorForm| NIL) |