[project @ 2000-03-23 17:45:17 by simonpj]
[ghc-hetmet.git] / ghc / compiler / deSugar / MatchLit.lhs
index af80397..f3e10ff 100644 (file)
@@ -19,7 +19,7 @@ import Id             ( Id )
 import DsMonad
 import DsUtils
 
-import Const           ( mkMachInt, Literal(..) )
+import Literal         ( mkMachInt, Literal(..) )
 import PrimRep          ( PrimRep(IntRep) )
 import Maybes          ( catMaybes )
 import Type            ( Type, isUnLiftedType )