Use extensible exceptions at the lowest level

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

diff --git a/GHC/TopHandler.lhs-boot b/GHC/TopHandler.lhs-boot
index 0340af2..389afe1 100644 (file)
--- a/GHC/TopHandler.lhs-boot
+++ b/GHC/TopHandler.lhs-boot
@@ -2,8 +2,7 @@
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 module GHC.TopHandler ( reportError, reportStackOverflow ) where
 
-import GHC.Exception ( Exception )
-import GHC.IOBase    ( IO )
+import GHC.IOBase    ( IO, Exception )
 
 reportError :: Exception -> IO a
 reportStackOverflow :: IO a