X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FErr.lhs-boot;h=932f699de97c66cfdd04e20349ccbf7155c4911c;hb=41e8fba828acbae1751628af50849f5352b27873;hp=5b49c4efe1e85a7e5035c271983105f6c9a7fb97;hpb=1b1289f3c7cba2895500623a1fa748e9b2873669;p=ghc-base.git diff --git a/GHC/Err.lhs-boot b/GHC/Err.lhs-boot index 5b49c4e..932f699 100644 --- a/GHC/Err.lhs-boot +++ b/GHC/Err.lhs-boot @@ -1,10 +1,11 @@ \begin{code} -{-# OPTIONS -fno-implicit-prelude #-} +{-# LANGUAGE NoImplicitPrelude #-} + --------------------------------------------------------------------------- -- Ghc.Err.hs-boot --------------------------------------------------------------------------- -module GHC.Err( error, divZeroError, overflowError ) where +module GHC.Err( error ) where -- The type signature for 'error' is a gross hack. -- First, we can't give an accurate type for error, because it mentions @@ -17,10 +18,4 @@ module GHC.Err( error, divZeroError, overflowError ) where -- to mention 'error' so that it gets exported from this .hi-boot -- file. error :: a - --- divide by zero is needed quite early -divZeroError :: a - --- overflow is needed quite early -overflowError :: a \end{code}