aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-15 05:56:53 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-15 05:56:53 +0000
commitf6073b2551b4053087052fc5a31e3875e1f67913 (patch)
tree898e3925814a86d15607a4cc894224540e12fc6c /src/interp/compiler.boot
parent66f954a68f42d1b3e9539bbfd794bc74e553bf93 (diff)
downloadopen-axiom-f6073b2551b4053087052fc5a31e3875e1f67913.tar.gz
* lisp/core.lisp.in (getOptionValue): Export.
* interp/sys-driver.boot (initializeGlobalState): Record value for --system-algebra. * interp/sys-globals.boot ($buildingSystemAlgebra): Declare. * interp/compiler.boot (compileSpad2Cmd): Don't build local database if compiling system algebra. * interp/i-syscmd.boot (compileAsharpCmd1): Likewise. * algebra/Makefile.pamphlet (%.NRLIB/code.$(FASLEXT)): Use --system-algebra. (SPADPRSR.NRLIB/code.$(FASLEXT)): Likewise. (PARSER.NRLIB/code.$(FASLEXT)): Likewise.
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r--src/interp/compiler.boot3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index 644a7f79..b3f6a7f7 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -1741,7 +1741,8 @@ compileSpad2Cmd args ==
compilerDoitWithScreenedLisplib(constructor, fun)
else
compilerDoit(constructor, fun)
- extendLocalLibdb $newConlist
+ if not $buildingSystemAlgebra then
+ extendLocalLibdb $newConlist
terminateSystemCommand()
spadPrompt()