Add tests from testsuite/tests/h98

[ghc-base.git] / GHC / Err.lhs-boot

diff --git a/GHC/Err.lhs-boot b/GHC/Err.lhs-boot
index 0b18d30..932f699 100644 (file)
--- a/GHC/Err.lhs-boot
+++ b/GHC/Err.lhs-boot
@@ -1,10 +1,11 @@
 \begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# 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}