X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FErr.lhs-boot;h=5b49c4efe1e85a7e5035c271983105f6c9a7fb97;hb=7efaa60ca9b644c3b43e4bd686b71ee281225faf;hp=70afbb91219127dd94955548cb718c6eccb39ed8;hpb=8750d41a6d5b72631782a8a56418d199a0aa4c58;p=haskell-directory.git diff --git a/GHC/Err.lhs-boot b/GHC/Err.lhs-boot index 70afbb9..5b49c4e 100644 --- a/GHC/Err.lhs-boot +++ b/GHC/Err.lhs-boot @@ -4,7 +4,7 @@ -- Ghc.Err.hs-boot --------------------------------------------------------------------------- -module GHC.Err( error, divZeroError ) where +module GHC.Err( error, divZeroError, overflowError ) where -- The type signature for 'error' is a gross hack. -- First, we can't give an accurate type for error, because it mentions @@ -20,4 +20,7 @@ error :: a -- divide by zero is needed quite early divZeroError :: a + +-- overflow is needed quite early +overflowError :: a \end{code}