diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-08-27 06:41:59 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-08-27 06:41:59 +0000 |
| commit | f3e1316f943136ab1428ff1caea540c85585bb16 (patch) | |
| tree | dd207be5299d886f45da67d7e8888e5a260aacd4 /src/interp/bootfuns.lisp.pamphlet | |
| parent | 155501c7ef2f4d48f22883a4bee1651b2a51799a (diff) | |
| download | open-axiom-f3e1316f943136ab1428ff1caea540c85585bb16.tar.gz | |
* bootfuns.lisp.pamphlet (|$forceDatabaseUpdate|): Move to
sys-globals.boot.
(|$form|): Likewise.
(|$fromSpadTrace|): Likewise
(|$genSDVar|): Likewise.
(|$Index|): Likewise.
(|$inLispVM|): Likewise.
(|$insideCapsuleFunctionIfTrue|): Likewise.
(|$insideCategoryIfTrue|): Likewise.
(|$insideCoerceInteractiveHardIfTrue|): Likewise.
(|$insideCompTypeOf|): Likewise.
(|$insideConstructIfTrue|): Likewise.
(|$insideExpressionIfTrue|): Likewise.
(|$insideFunctorIfTrue|): Likewise.
(|$insideWhereIfTrue|): Likewise.
(|$instantRecord|): Likewise.
(|$InteractiveFrame|): Likewise.
(|$InteractiveMode|): Likewise.
(|$InteractiveTimingStatsIfTrue|): Likewise.
(|$genFVar|): Remove.
(|$ignoreCommentsIfTrue|): Likewise.
(|$InteractiveModemapFrame|): Likewise.
* setq.lisp.pamphlet (|$inLispVM|): Remove.
(|$InteractiveMode|): Likewise.
(|$forceDatabaseUpdate|): Likewise.
(|$InteractiveFrame|): Likewise.
(|$form|): Likewise.
(|$Index|): Likewise.
* sys-constants.boot ($ExitMode): Define.
($exitMode): Move from bootfuns.lisp.pamphlet.
* sys-globals.boot ($form): Likewise.
($fromSpadTrace): Likewise.
($genSDVar): Likewise.
($Index): Likewise.
($inLispVM): Likewise.
($insideCapsuleFunctionIfTrue): Likewise.
($insideCategoryIfTrue): Likewise.
($insideCoerceInteractiveHardIfTrue): Likewise.
($insideConstructIfTrue): Likewise.
($insideExpressionIfTrue): Likewise.
($insideFunctorIfTrue): Likewise.
($insideWhereIfTrue): Likewise.
($instantRecord): Likewise.
($InteractiveFrame): Likewise.
($(InteractiveMode): Likewise.
($InteractiveTimingStatsIftrue): Likewise.
($forceDatabaseUpdate): Likewise.
* spad.lisp.pamphlet (S-PROCESS): Don't bind $exitMode here.
* bootfuns.lisp.pamphlet (|$exitMode|): Move to sys-constants.boot
* wi2.boot.pamphlet (compDefineFunctor1): Likewise.
* spad.lisp.pamphlet (S-PROCESS): Likewise.
* define.boot.pamphlet (compDefineFunctor1): Remove unused
$genFVar.
* varini.boot.pamphlet ($ExitMode): Don't double define here.
Diffstat (limited to 'src/interp/bootfuns.lisp.pamphlet')
| -rw-r--r-- | src/interp/bootfuns.lisp.pamphlet | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/src/interp/bootfuns.lisp.pamphlet b/src/interp/bootfuns.lisp.pamphlet index 93b4222b..7d003826 100644 --- a/src/interp/bootfuns.lisp.pamphlet +++ b/src/interp/bootfuns.lisp.pamphlet @@ -123,32 +123,10 @@ offer it as extensions. (def-boot-val $delay 0 "???") (def-boot-var $Directory "???") (def-boot-var $DISPLAY "???") -(def-boot-var |$exitMode| "???") -(def-boot-var |$forceDatabaseUpdate| "See load function.") -(def-boot-var |$form| "???") -(def-boot-var |$fromSpadTrace| "Interpreter>Trace.boot") (def-boot-var $function "Interpreter>System.boot") (def-boot-var $FunName "???") (def-boot-var $FunName_Tail "???") (def-boot-val |$gauss01| '(|gauss| 0 1) "???") -(def-boot-var |$genFVar| "???") -(def-boot-val |$genSDVar| 0 "counter for genSomeVariable" ) -(def-boot-var |$ignoreCommentsIfTrue| "???") -(def-boot-var |$Index| "???") -(def-boot-var |$inLispVM| "Interpreter>Eval.boot") -(def-boot-var |$insideCapsuleFunctionIfTrue| "???") -(def-boot-var |$insideCategoryIfTrue| "???") -(def-boot-var |$insideCoerceInteractiveHardIfTrue| "???") -(def-boot-val |$insideCompTypeOf| NIL "checked in comp3") -(def-boot-val |$insideConstructIfTrue| NIL "checked in parse.boot") -(def-boot-var |$insideExpressionIfTrue| "???") -(def-boot-var |$insideFunctorIfTrue| "???") -(def-boot-var |$insideWhereIfTrue| "???") -(def-boot-val |$instantRecord| (MAKE-HASHTABLE 'ID) "???") -(def-boot-val |$InteractiveFrame| '((NIL)) "top level environment") -(def-boot-var |$InteractiveMode| "Interactive>System.boot") -(def-boot-val |$InteractiveModemapFrame| '((NIL)) "???") -(def-boot-var |$InteractiveTimingStatsIfTrue| "???") (def-boot-val $lastprefix "S-" "???") (def-boot-val |$lastUntraced| NIL "Used for )restore option of )trace.") (def-boot-var |$leaveLevelStack| "???") |