[project @ 1998-01-27 17:39:45 by simonm]

use an explicit primitive integer for minBound::Int to avoid problems
with overloading and negation.

diff --git a/ghc/lib/ghc/PrelBounded.lhs b/ghc/lib/ghc/PrelBounded.lhs
index 3d1d0fd..59dc439 100644 (file)
--- a/ghc/lib/ghc/PrelBounded.lhs
+++ b/ghc/lib/ghc/PrelBounded.lhs
@@ -21,6 +21,6 @@ instance  Bounded Char  where
     maxBound =  '\255'
 
 instance  Bounded Int where
-    minBound =  -2147483648            -- GHC <= 2.09 had this at -2147483647
-    maxBound =   2147483647
+    minBound =  I# -2147483648#                -- GHC <= 2.09 had this at -2147483647
+    maxBound =  2147483647
 \end{code}