diff options
author | dos-reis <gdr@axiomatics.org> | 2007-08-29 13:38:42 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-08-29 13:38:42 +0000 |
commit | 425fcbfda67e0e702cf61dcaa5a83f0809b7ebd8 (patch) | |
tree | bc08f075a420004d97ade7e2502702ac7aeba3b9 /src/interp/trace.boot.pamphlet | |
parent | f3e1316f943136ab1428ff1caea540c85585bb16 (diff) | |
download | open-axiom-425fcbfda67e0e702cf61dcaa5a83f0809b7ebd8.tar.gz |
* sys-globals.boot ($leaveLevelStack): Move from
bootfuns.lisp.pamphlet.
($letAssoc): Likewise.
($libFile): Likewise.
($lisplibForm): Likewise.
($lisplibKind): Likewise.
($lisplibModemapAlist): Likewise.
($lisplibModemap): Likewise.
($lisplibOperationAlist): Likewise.
($lisplibSignatureAlist): Likewise.
($lisplibVariableAlist): Likewise.
($mapSubNameAlist): Likewise.
($mathTrace): Lilkewise.
($mathTraceList): Likewise.
* sys-constants.boot ($exitMode): Likewise.
($leaveMode): Likewise.
($noEnv): Likewise.
* trace.boot.pamphlet ($lastUntraced): Likewise.
* spad.lisp.pamphlet (|$leaveMode|): Don't bind here.
* setq.lisp.pamphlet (|$Lisp|): Remove.
(|$noEnv|): Don't set here.
(|$lastUntraced|): Likewise.
(|$mostRecentOpAlist|): Likewise.
(|$mathTraceList|): Likewise.
(|$letAssoc|): Likewise.
* bootfuns.lisp.pamphlet (|$noEnv|): Move to sys-constants.boot.
(|$leaveMode|): Likewise.
(|$lastUntraced|): Move to trace.boot.pamphlet.
(|$leaveLevelStack|): Move to sys-globals.boot.
(|$letAssoc|): Likewise.
(|$libFile|): Likewise.
(|$lisplibDomainDependents|): Likewise.
(|$lisplibForm|): Likewise.
(|$lisplibKind|): Likewise.
(|$lisplibModemapAlist|): Likewise.
(|$lisplibModemap|): Likewise.
(|$lisplibOperationAlist|): Likewise.
(|$lisplibSignatureAlist|): Likewise.
(|$lisplibVariableAlist|): Likewise.
(|$mapSubNameAlist|): Likewise.
(|$mathTrace|): Likewise.
(|$mathTraceList|): Likewise.
(|$Lisp|): Remove.
(|$lisplibDependentCategories|): Likewise.
(|$lisp2lispRenameAssoc|): Likewise.
(|$ModemapFrame|): Likewise.
(|$mostRecentOpAlist|): Likewise.
Diffstat (limited to 'src/interp/trace.boot.pamphlet')
-rw-r--r-- | src/interp/trace.boot.pamphlet | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/interp/trace.boot.pamphlet b/src/interp/trace.boot.pamphlet index f6890cde..1563ea98 100644 --- a/src/interp/trace.boot.pamphlet +++ b/src/interp/trace.boot.pamphlet @@ -84,6 +84,9 @@ SETANDFILEQ($traceOptionList,'( within _ )) + +SETANDFILEQ($lastUntraced,NIL) + trace l == traceSpad2Cmd l traceSpad2Cmd l == |