X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FErr.lhs-boot;h=9bef80d9257f7e802f3499907af6280f73cac1e1;hb=7dfe4a22aa6a2c598b1496c661c7d532aaafa94f;hp=5b49c4efe1e85a7e5035c271983105f6c9a7fb97;hpb=1b1289f3c7cba2895500623a1fa748e9b2873669;p=ghc-base.git diff --git a/GHC/Err.lhs-boot b/GHC/Err.lhs-boot index 5b49c4e..9bef80d 100644 --- a/GHC/Err.lhs-boot +++ b/GHC/Err.lhs-boot @@ -1,10 +1,10 @@ \begin{code} -{-# OPTIONS -fno-implicit-prelude #-} +{-# OPTIONS_GHC -XNoImplicitPrelude #-} --------------------------------------------------------------------------- -- 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 +17,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}