X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FdeSugar%2FDsBreakpoint.lhs;h=799e8b6a6822a361c5b1fd4d22df7d8306af7a02;hb=0125dc2632c30589829c7a911ea392902f67e4d2;hp=1393a9df2be17b476a1f3ce5df4f3dc81e38da9d;hpb=402cb6db0de6e607d874328784bd43e747376dc1;p=ghc-hetmet.git

diff --git a/compiler/deSugar/DsBreakpoint.lhs b/compiler/deSugar/DsBreakpoint.lhs
index 1393a9d..799e8b6 100644
--- a/compiler/deSugar/DsBreakpoint.lhs
+++ b/compiler/deSugar/DsBreakpoint.lhs
@@ -14,7 +14,6 @@ module DsBreakpoint(
                    , mkBreakpointExpr
                    ) where
 
-import IOEnv
 import TysPrim
 import TysWiredIn
 import PrelNames        
@@ -25,9 +24,6 @@ import TyCon
 import TypeRep
 import DataCon          
 import Type             
-import MkId
-import Name
-import Var
 import Id 
 
 import IdInfo
@@ -50,7 +46,6 @@ import Control.Monad
 import Data.IORef
 import Foreign.StablePtr
 import GHC.Exts
-
 #ifdef GHCI
 mkBreakpointExpr :: SrcSpan -> Id -> DsM (LHsExpr Id)
 mkBreakpointExpr loc bkptFuncId = do