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 | |
| 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')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/interp/sys-driver.boot | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 4d69ae27..76895660 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2009-07-05 Gabriel Dos Reis <gdr@cs.tamu.edu> + + * interp/sys-driver.boot (AxiomCore::%sysInit): Have CLISP not be + overreading on floating point contagion warning. + 2009-07-04 Gabriel Dos Reis <gdr@cs.tamu.edu> * interp/c-util.boot ($middleEndMacroList): Remove COLLECTV. 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) |