[project @ 1997-11-13 10:52:43 by simonm]
[ghc-hetmet.git] / ghc / compiler / deSugar / DsCCall.lhs
index 5519ea4..1cae7d0 100644 (file)
@@ -17,7 +17,7 @@ import DsMonad
 import DsUtils
 
 import CoreUtils       ( coreExprType )
-import Id              ( dataConArgTys, dataConTyCon, idType )
+import Id              ( Id(..), dataConArgTys, dataConTyCon, idType )
 import Maybes          ( maybeToBool )
 import Outputable      ( PprStyle(..), Outputable(..) )
 import PprType         ( GenType{-instances-} )