[project @ 2000-07-02 18:50:24 by panne]
[ghc-hetmet.git] / ghc / compiler / codeGen / CgRetConv.lhs
index d4784b6..e292ea1 100644 (file)
@@ -1,7 +1,7 @@
 %
 % (c) The GRASP Project, Glasgow University, 1992-1998
 %
-% $Id: CgRetConv.lhs,v 1.19 1999/05/13 17:30:58 simonm Exp $
+% $Id: CgRetConv.lhs,v 1.22 2000/05/25 12:41:15 simonpj Exp $
 %
 \section[CgRetConv]{Return conventions for the code generator}
 
@@ -27,12 +27,11 @@ import CmdLineOpts  ( opt_UseVanillaRegs, opt_UseFloatRegs,
                          opt_UseDoubleRegs, opt_UseLongRegs
                        )
 import Maybes          ( catMaybes )
-import DataCon         ( dataConRawArgTys, DataCon )
+import DataCon         ( DataCon )
 import PrimOp          ( PrimOp{-instance Outputable-} )
 import PrimRep         ( isFloatingRep, PrimRep(..), is64BitRep )
-import TyCon           ( TyCon, tyConDataCons, tyConFamilySize )
-import Type            ( Type, typePrimRep, isUnLiftedType, 
-                         splitAlgTyConApp_maybe )
+import TyCon           ( TyCon, tyConFamilySize )
+import Type            ( Type, typePrimRep, isUnLiftedType )
 import Util            ( isn'tIn )
 
 import Outputable