diff options
Diffstat (limited to 'src/interp/setq.lisp')
| -rw-r--r-- | src/interp/setq.lisp | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/interp/setq.lisp b/src/interp/setq.lisp index 992ad396..e62c3676 100644 --- a/src/interp/setq.lisp +++ b/src/interp/setq.lisp @@ -85,9 +85,9 @@ (SETQ |$insideCompileBodyIfTrue| NIL) (SETQ |$globalExposureGroupAlist| NIL) (SETQ |$localExposureDataDefault| - (VECTOR (LIST '|basic| '|categories| '|naglink| '|anna| ) NIL NIL)) + (VECTOR (LIST '|basic| '|categories|) NIL NIL)) (SETQ |$localExposureData| - (VECTOR (LIST '|basic| '|categories| '|naglink| '|anna| ) NIL NIL)) + (VECTOR (LIST '|basic| '|categories|) NIL NIL)) (SETQ |$compilingInputFile| NIL) (SETQ |$minivectorNames| NIL) (setq |$ReadingFile| NIL) @@ -232,9 +232,7 @@ (|restore| . "history )restore") (|save| . "history )save") (|startGraphics| . "system $AXIOM/lib/viewman &") - (|startNAGLink| . "system $AXIOM/lib/nagman &") (|stopGraphics| . "lisp (|sockSendSignal| 2 15)") - (|stopNAGLink| . "lisp (|sockSendSignal| 8 15)") (|time| . "set message time") (|type| . "set message type") (|unexpose| . "set expose drop constructor") |