diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/sys-os.boot | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot index c4f45e66..aae3dad3 100644 --- a/src/interp/sys-os.boot +++ b/src/interp/sys-os.boot @@ -198,16 +198,16 @@ runProgram(prog,args) == ++ numeric limits + +import quiet__double__NaN: () -> double for quietDoubleNaN + )if %hasFeature KEYWORD::GCL import plus__infinity: () -> double for plusInfinity import minus__infinity: () -> double for minusInfinity -import NANQ: () -> double for NaNQ - $plusInfinity := plusInfinity() $minusInfinity := minusInfinity() -$NaNvalue := NaNQ() )elseif %hasFeature KEYWORD::SBCL $plusInfinity == SB_-EXT::DOUBLE_-FLOAT_-POSITIVE_-INFINITY |