Use explicit language extensions & remove extension fields from base.cabal

[ghc-base.git] / GHC / IO / Exception.hs

diff --git a/GHC/IO/Exception.hs b/GHC/IO/Exception.hs
index ce05a54..4134fca 100644 (file)
--- a/GHC/IO/Exception.hs
+++ b/GHC/IO/Exception.hs
@@ -1,4 +1,5 @@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude, DeriveDataTypeable, MagicHash #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
 -- |
@@ -64,7 +65,7 @@ blockedIndefinitelyOnMVar = toException BlockedIndefinitelyOnMVar
 
 -----
 
--- |The thread is awiting to retry an STM transaction, but there are no
+-- |The thread is waiting to retry an STM transaction, but there are no
 -- other references to any @TVar@s involved, so it can't ever continue.
 data BlockedIndefinitelyOnSTM = BlockedIndefinitelyOnSTM
     deriving Typeable
@@ -91,8 +92,7 @@ instance Show Deadlock where
 
 -----
 
--- |There are no runnable threads, so the program is deadlocked.
--- The @Deadlock@ exception is raised in the main thread only.
+-- |'assert' was applied to 'False'.
 data AssertionFailed = AssertionFailed String
     deriving Typeable
 
@@ -170,6 +170,7 @@ instance Show ArrayException where
 -- We need it here because it is used in ExitException in the
 -- Exception datatype (above).
 
+-- | Defines the exit codes that a program can return.
 data ExitCode
   = ExitSuccess -- ^ indicates successful termination;
   | ExitFailure Int
@@ -194,7 +195,7 @@ ioError         =  ioException
 -- | The Haskell 98 type for exceptions in the 'IO' monad.
 -- Any I\/O operation may raise an 'IOError' instead of returning a result.
 -- For a more general type of exception, including also those that arise
--- in pure code, see 'Control.Exception.Exception'.
+-- in pure code, see "Control.Exception.Exception".
 --
 -- In Haskell 98, this is an opaque type.
 type IOError = IOException