[project @ 1998-03-19 23:54:49 by simonpj]

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

diff --git a/ghc/compiler/deSugar/DsCCall.lhs b/ghc/compiler/deSugar/DsCCall.lhs
index 7e1bc0e..bac1e98 100644 (file)
--- a/ghc/compiler/deSugar/DsCCall.lhs
+++ b/ghc/compiler/deSugar/DsCCall.lhs
@@ -17,7 +17,6 @@ import TcHsSyn                ( maybeBoxedPrimType )
 import CoreUtils       ( coreExprType )
 import Id              ( Id(..), dataConArgTys, idType )
 import Maybes          ( maybeToBool )
-import PprType         ( GenType{-instances-} )
 import PrelVals                ( packStringForCId )
 import PrimOp          ( PrimOp(..) )
 import Type            ( isUnpointedType, splitAlgTyConApp_maybe,