From decba0d6607869f749627d3cd03df0e8c9948bb3 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Mon, 26 Jan 1998 11:04:18 +0000
Subject: [PATCH] [project @ 1998-01-26 11:04:18 by simonm] Remove use of
lit-lit for minBound::Int, this was only needed for bootstrapping.
---
ghc/lib/ghc/PrelBounded.lhs | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/ghc/lib/ghc/PrelBounded.lhs b/ghc/lib/ghc/PrelBounded.lhs
index 240f27781ecd..3d1d0fd68cd4 100644
--- a/ghc/lib/ghc/PrelBounded.lhs
+++ b/ghc/lib/ghc/PrelBounded.lhs
@@ -11,8 +11,6 @@ Instances of Bounded for various datatypes.
module PrelBounded where
import PrelBase
-import CCall -- for the dependency analyser,
- -- due to the use of litlits below.
instance Bounded () where
minBound = ()
@@ -23,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 = -2147483648 -- GHC <= 2.09 had this at -2147483647
+ maxBound = 2147483647
\end{code}
--
GitLab