[project @ 1997-07-25 23:10:05 by sof]
authorsof <unknown>
Fri, 25 Jul 1997 23:10:39 +0000 (23:10 +0000)
committersof <unknown>
Fri, 25 Jul 1997 23:10:39 +0000 (23:10 +0000)
imports changed

ghc/compiler/absCSyn/CLabel.lhs
ghc/compiler/absCSyn/PprAbsC.lhs

index 7a7c548..814b1d5 100644 (file)
@@ -48,13 +48,6 @@ module CLabel (
     ) where
 
 IMP_Ubiq(){-uitous-}
-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ <= 201
-IMPORT_DELOOPER(AbsCLoop)              ( CtrlReturnConvention(..),
-                         ctrlReturnConvAlg
-                       )
-#else
-import {-# SOURCE #-} CgRetConv
-#endif
 
 
 #if ! OMIT_NATIVE_CODEGEN
@@ -65,6 +58,7 @@ import {-# SOURCE #-} MachMisc ( underscorePrefix, fmtAsmLbl )
 # endif
 #endif
 
+import CgRetConv       ( CtrlReturnConvention(..), ctrlReturnConvAlg )
 import CStrings                ( pp_cSEP )
 import Id              ( externallyVisibleId, cmpId_withSpecDataCon,
                          isDataCon, isDictFunId,
index 3454645..23c530b 100644 (file)
@@ -31,11 +31,10 @@ import GlaExts (Addr(..))
 #if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ <= 201
 IMPORT_DELOOPER(AbsCLoop)              -- break its dependence on ClosureInfo
 #else
-import {-# SOURCE #-} ClosureInfo
 #endif
 
 import AbsCSyn
-
+import ClosureInfo
 import AbsCUtils       ( getAmodeRep, nonemptyAbsC,
                          mixedPtrLocn, mixedTypeLocn
                        )