X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Fghc%2FPrelBase.lhs;fp=ghc%2Flib%2Fghc%2FPrelBase.lhs;h=6f2c47bcfe55575bebeb6d36c610571560c0a49c;hb=655b318c258603aa5205e2da59b93797f909aa16;hp=295736131be75ec34281693af506306e43665f6e;hpb=6d3ef5e5a00b403c2bddcfb979a2b43cfe093beb;p=ghc-hetmet.git

diff --git a/ghc/lib/ghc/PrelBase.lhs b/ghc/lib/ghc/PrelBase.lhs
index 2957361..6f2c47b 100644
--- a/ghc/lib/ghc/PrelBase.lhs
+++ b/ghc/lib/ghc/PrelBase.lhs
@@ -583,8 +583,8 @@ eftInt now step
 
 
 instance  Bounded Int where
-    minBound =  negate 2147483647   -- **********************
-    maxBound =  2147483647	    -- **********************
+    minBound =  negate 214748367 - 1   -- **********************
+    maxBound =  2147483647	       -- **********************
 
 instance  Num Int  where
     (+)	   x y =  plusInt x y