diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-11-14 00:43:07 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-11-14 00:43:07 +0000 |
| commit | 0f0562ca9672568f3f8ca33ec6a17ba64c36c015 (patch) | |
| tree | a35da963718129005c2d3adc0d5c2d63351aae15 /src/interp/sys-driver.boot | |
| parent | 497f3b11ac5f486f73a1d4dd51669aeb0bb0b5fe (diff) | |
| download | open-axiom-0f0562ca9672568f3f8ca33ec6a17ba64c36c015.tar.gz | |
* lisp/core.lisp.in: Export %sysInit.
* interp/sys-driver.boot (%sysInit): Don't redefine. Reset
function binding.
Diffstat (limited to 'src/interp/sys-driver.boot')
| -rw-r--r-- | src/interp/sys-driver.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot index b19aa5cf..6dbbe12d 100644 --- a/src/interp/sys-driver.boot +++ b/src/interp/sys-driver.boot @@ -56,7 +56,7 @@ $options := [] +++ Initialization routine run by the core system before handing off +++ to the interpreter or compiler. +++ ??? This part is still in flux. -AxiomCore::%sysInit() == +symbolFunction('%sysInit) := () +-> SETQ(_*READ_-DEFAULT_-FLOAT_-FORMAT_*, "DOUBLE-FLOAT") SETQ(_*PACKAGE_*, FIND_-PACKAGE '"BOOT") SETQ(_*LOAD_-VERBOSE_*,false) |