X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FdeSugar%2FMatchLit.lhs;fp=ghc%2Fcompiler%2FdeSugar%2FMatchLit.lhs;h=fd57f0dc40e2838b553e14a61e9975f7617477cd;hb=1b7a99e3e7f64c6f402e8aece32ba0b9a3703bfa;hp=f3e10ff5c03181469d728ec064f45a3b4d75097d;hpb=6e0892adec42702e7879a23587d2c7210c55a078;p=ghc-hetmet.git

diff --git a/ghc/compiler/deSugar/MatchLit.lhs b/ghc/compiler/deSugar/MatchLit.lhs
index f3e10ff..fd57f0d 100644
--- a/ghc/compiler/deSugar/MatchLit.lhs
+++ b/ghc/compiler/deSugar/MatchLit.lhs
@@ -12,7 +12,6 @@ import {-# SOURCE #-} Match  ( match )
 import {-# SOURCE #-} DsExpr ( dsExpr )
 
 import HsSyn		( HsLit(..), OutPat(..), HsExpr(..) )
-import TcHsSyn		( TypecheckedHsExpr, TypecheckedPat )
 import CoreSyn		( Expr(..), Bind(..) )
 import Id		( Id )
 
@@ -20,7 +19,6 @@ import DsMonad
 import DsUtils
 
 import Literal		( mkMachInt, Literal(..) )
-import PrimRep          ( PrimRep(IntRep) )
 import Maybes		( catMaybes )
 import Type		( Type, isUnLiftedType )
 import Panic		( panic, assertPanic )