aboutsummaryrefslogtreecommitdiff
path: root/src/interp/sys-driver.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-17 19:32:06 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-17 19:32:06 +0000
commitb1e0367cb4bf149450f325beb40be5fd6c0e5482 (patch)
treedb39b9542b70283c3aaa479ab1edd8b0e8615f53 /src/interp/sys-driver.boot
parent5e504b6abaef6cf7e7c58c17e26bec33856b60c0 (diff)
downloadopen-axiom-b1e0367cb4bf149450f325beb40be5fd6c0e5482.tar.gz
* interp/sys-globals.boot ($updateCatTableIfTrue): Default to false.
* interp/sys-driver.boot (AxiomCore::%sysInit): Have ECL quiet. (initializeGlobalState): Initialize new world states. * interp/define.boot (compDefine): Tidy. (compDefineCategory2): Explicitly initialize $TOP_LEVEL and $definition. * interp/daase.lisp (|fillDatabasesInCore|): Use $buildingSystemAlgebra. * interp/compiler.boot (compMakeDeclaration): Explicitly initialize $insideExpressionIfTrue. * boot/translator.boot (AxiomCore::%sysInit): Supper GCL and ECL compiler notes, but ask for warning.
Diffstat (limited to 'src/interp/sys-driver.boot')
-rw-r--r--src/interp/sys-driver.boot3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot
index cc82e8b5..05c39858 100644
--- a/src/interp/sys-driver.boot
+++ b/src/interp/sys-driver.boot
@@ -71,7 +71,7 @@ AxiomCore::%sysInit() ==
-- a goat for CLisp FFI, please.
sys_-osInitCLispFFI()
)endif
-)if %hasFeature KEYWORD::GCL
+)if %hasFeature KEYWORD::GCL or %hasFeature KEYWORD::ECL
SETQ(COMPILER::_*COMPILE_-VERBOSE_*,false)
SETQ(COMPILER::_*SUPPRESS_-COMPILER_-WARNINGS_*,true)
SETQ(COMPILER::_*SUPPRESS_-COMPILER_-NOTES_*,true)
@@ -190,6 +190,7 @@ initializeGlobalState() ==
GCMSG(NIL)
if have_to then
$superHash := MAKE_-HASHTABLE('UEQUAL)
+ initNewWorld()
-- 1. Macros.
if have_to then buildHtMacroTable()