diff options
Diffstat (limited to 'src/interp/sys-constants.boot')
| -rw-r--r-- | src/interp/sys-constants.boot | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/src/interp/sys-constants.boot b/src/interp/sys-constants.boot index 7ffa4460..3812d378 100644 --- a/src/interp/sys-constants.boot +++ b/src/interp/sys-constants.boot @@ -56,30 +56,6 @@ $ShortMinimum == $ShortMaximum == MOST_-POSITIVE_-FIXNUM -++ Minimum for %SingleFloat values. -$SingleFloatMinimum == -)if %hasFeature KEYWORD::GCL - MOST_-NEGATIVE_-SHORT_-FLOAT -)else - MOST_-NEGATIVE_-SINGLE_-FLOAT -)endif - -++ Maximum for %SingleFloat values. -$SingleFloatMaximum == -)if %hasFeature KEYWORD::GCL - MOST_-POSITIVE_-SHORT_-FLOAT -)else - MOST_-POSITIVE_-SINGLE_-FLOAT -)endif - -++ Machine precision for %SingleFloat -$SingleFloatEpsilon == -)if %hasFeature KEYWORD::GCL - SHORT_-FLOAT_-EPSILON -)else - SINGLE_-FLOAT_-EPSILON -)endif - ++ Maximum for %DoubleFloat values $DoubleFloatMinimum == MOST_-NEGATIVE_-DOUBLE_-FLOAT @@ -430,10 +406,6 @@ $ComplexInteger == ["Complex", $Integer] -++ SingleFloat domain constructor form -$SingleFloat == - '(SingleFloat) - ++ Float domain constructor form $Float == '(Float) |