diff options
| author | dos-reis <gdr@axiomatics.org> | 2009-07-05 14:15:35 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2009-07-05 14:15:35 +0000 |
| commit | c4600e518e8f15d2b5e16407fffaf2f6f1ecf13b (patch) | |
| tree | 32a83231a4bcf81175d13472d8fcb904b1b7d457 /src/interp | |
| parent | 3b9f124fb12034e4aaaa9c13222caa24940c37dc (diff) | |
| download | open-axiom-c4600e518e8f15d2b5e16407fffaf2f6f1ecf13b.tar.gz | |
* interp/sys-driver.boot (AxiomCore::%sysInit): Have CLISP not be
overreading on floating point contagion warning.
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/sys-driver.boot | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot index 58b36e74..de08b540 100644 --- a/src/interp/sys-driver.boot +++ b/src/interp/sys-driver.boot @@ -64,7 +64,9 @@ AxiomCore::%sysInit() == loadSystemRuntimeCore() )if %hasFeature KEYWORD::CLISP -- a goat for CLisp FFI, please. - sys_-osInitCLispFFI() + sys_-osInitCLispFFI() + -- Tell CLISP to stop being anal retentive, please. + SETF(CUSTOM::_*WARN_-ON_-FLOATING_-POINT_-CONTAGION_*,false) )endif )if %hasFeature KEYWORD::GCL or %hasFeature KEYWORD::ECL SETQ(COMPILER::_*COMPILE_-VERBOSE_*,false) |