[project @ 2003-02-21 13:25:17 by simonpj]

[ghc-hetmet.git] / ghc / compiler / deSugar / DsExpr.lhs

diff --git a/ghc/compiler/deSugar/DsExpr.lhs b/ghc/compiler/deSugar/DsExpr.lhs
index 3a31d90..46e63e3 100644 (file)
--- a/ghc/compiler/deSugar/DsExpr.lhs
+++ b/ghc/compiler/deSugar/DsExpr.lhs
@@ -23,7 +23,7 @@ import DsMonad
 import DsMeta          ( dsBracket, dsReify )
 #endif
 
-import HsSyn           ( HsExpr(..), Pat(..), HsLit(..), ArithSeqInfo(..),
+import HsSyn           ( HsExpr(..), Pat(..), ArithSeqInfo(..),
                          Stmt(..), HsMatchContext(..), HsStmtContext(..), 
                          Match(..), HsBinds(..), MonoBinds(..), HsConDetails(..),
                          mkSimpleMatch, isDoExpr
@@ -40,7 +40,6 @@ import TcType         ( tcSplitAppTy, tcSplitFunTys, tcTyConAppArgs,
                          mkAppTy )
 import Type            ( splitFunTys )
 import CoreSyn
-import Literal         ( Literal(..) )
 import CoreUtils       ( exprType, mkIfThenElse, bindNonRec )
 
 import FieldLabel      ( FieldLabel, fieldLabelTyCon )