From: simonm <unknown>
Date: Tue, 27 Jan 1998 17:39:45 +0000 (+0000)
Subject: [project @ 1998-01-27 17:39:45 by simonm]
X-Git-Tag: Approx_2487_patches~1051
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=4d9333b7aa8ad1b292b3764539da82834968cee0;p=ghc-hetmet.git

[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
--- 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}