ghc/lib/ghc/PrelBounded.lhs

   1 %
   2 % (c) The GRASP/AQUA Project, Glasgow University, 1992-1996
   3 %
   4 \section[PrelBounded]{Module @PrelBounded@}
   5
   6 Instances of Bounded for various datatypes.
   7
   8 \begin{code}
   9 {-# OPTIONS -fno-implicit-prelude #-}
  10
  11 module PrelBounded where
  12
  13 import PrelBase
  14
  15 instance Bounded () where
  16     minBound = ()
  17     maxBound = ()
  18
  19 instance  Bounded Char  where
  20     minBound =  '\0'
  21     maxBound =  '\255'
  22
  23 instance  Bounded Int where
  24     minBound =  I# -2147483648#         -- GHC <= 2.09 had this at -2147483647
  25     maxBound =  2147483647
  26 \end{code}