diff options
author | dos-reis <gdr@axiomatics.org> | 2007-09-04 19:12:39 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-09-04 19:12:39 +0000 |
commit | 3eb3cdcbc53db2af4e6f1cce49da52594c3160d5 (patch) | |
tree | 50888b39cc115e890fb968bb7e51fa1d49f49aa3 /src/interp/bootfuns.lisp.pamphlet | |
parent | 59c10e72a5fe09481f1aee69ec9a3f25551a9680 (diff) | |
download | open-axiom-3eb3cdcbc53db2af4e6f1cce49da52594c3160d5.tar.gz |
* bootfuns.lisp.pamphlet (|$CategoryFrame|): Move to sys-globals.boot.
* setq.lisp.pamphlet (|$CategoryFrame|): Don't set here.
Diffstat (limited to 'src/interp/bootfuns.lisp.pamphlet')
-rw-r--r-- | src/interp/bootfuns.lisp.pamphlet | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/src/interp/bootfuns.lisp.pamphlet b/src/interp/bootfuns.lisp.pamphlet index bfb18a6c..ed8b3dc0 100644 --- a/src/interp/bootfuns.lisp.pamphlet +++ b/src/interp/bootfuns.lisp.pamphlet @@ -105,16 +105,6 @@ offer it as extensions. (export '(,p) "BOOT"))) -; modemap:== ( <map> (p e) (p e) ... (p e) ) -; modemaplist:= ( modemap ... ) - -(def-boot-val |$CategoryFrame| - '((((|Category| . ((|modemap| (((|Category|) (|Category|)) (T *))))) - (|Join| . ((|modemap| - (((|Category|) (|Category|) (|Category|) (|Category|)) (T *)) - (((|Category|) (|Category|) (|List| |Category|)) (|Category|)) (T *)) - ))))) - "Compiler>CUtil.boot") (def-boot-val |$spadLibFT| 'LISPLIB "???") @ \eject |