Skip to content
Snippets Groups Projects
Commit decba0d6 authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1998-01-26 11:04:18 by simonm]

Remove use of lit-lit for minBound::Int, this was only needed for
bootstrapping.
parent 00049b5f
No related branches found
No related tags found
No related merge requests found
...@@ -11,8 +11,6 @@ Instances of Bounded for various datatypes. ...@@ -11,8 +11,6 @@ Instances of Bounded for various datatypes.
module PrelBounded where module PrelBounded where
import PrelBase import PrelBase
import CCall -- for the dependency analyser,
-- due to the use of litlits below.
instance Bounded () where instance Bounded () where
minBound = () minBound = ()
...@@ -23,6 +21,6 @@ instance Bounded Char where ...@@ -23,6 +21,6 @@ instance Bounded Char where
maxBound = '\255' maxBound = '\255'
instance Bounded Int where instance Bounded Int where
minBound = ``-2147483648'' -- GHC <= 2.09 had this at -2147483647 minBound = -2147483648 -- GHC <= 2.09 had this at -2147483647
maxBound = 2147483647 maxBound = 2147483647
\end{code} \end{code}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment