[project @ 1997-07-25 23:04:49 by sof]

imports changed

diff --git a/ghc/compiler/absCSyn/AbsCSyn.lhs b/ghc/compiler/absCSyn/AbsCSyn.lhs
index f6dab7e..ce5d777 100644 (file)
--- a/ghc/compiler/absCSyn/AbsCSyn.lhs
+++ b/ghc/compiler/absCSyn/AbsCSyn.lhs
@@ -42,9 +42,8 @@ IMPORT_DELOOPER(AbsCLoop)
 # if  ! OMIT_NATIVE_CODEGEN
 import {-# SOURCE #-} MachMisc
 # endif
-import {-# SOURCE #-} CLabel
-import {-# SOURCE #-} ClosureInfo
-import {-# SOURCE #-} CgRetConv
+import {-# SOURCE #-} ClosureInfo ( ClosureInfo )
+import {-# SOURCE #-} CLabel     ( CLabel )
 #endif
 
 import Constants       ( mAX_Vanilla_REG, mAX_Float_REG,
@@ -55,7 +54,6 @@ import Constants      ( mAX_Vanilla_REG, mAX_Float_REG,
 import HeapOffs                ( SYN_IE(VirtualSpAOffset), SYN_IE(VirtualSpBOffset),
                          SYN_IE(VirtualHeapOffset), HeapOffset
                        )
-import CLabel           ( CLabel )
 import CostCentre       ( CostCentre )
 import Literal         ( mkMachInt, Literal )
 import PrimRep         ( isFollowableRep, PrimRep(..) )

diff --git a/ghc/compiler/absCSyn/AbsCUtils.lhs b/ghc/compiler/absCSyn/AbsCUtils.lhs
index 35a43d1..52212dc 100644 (file)
--- a/ghc/compiler/absCSyn/AbsCUtils.lhs
+++ b/ghc/compiler/absCSyn/AbsCUtils.lhs
@@ -20,10 +20,11 @@ module AbsCUtils (
     ) where
 
 IMP_Ubiq(){-uitous-}
+import {-# SOURCE #-} CLabel   ( mkReturnPtLabel, CLabel )
+       -- The loop here is (CLabel -> CgRetConv -> AbsCUtils -> CLabel)
 
 import AbsCSyn
 
-import CLabel          ( mkReturnPtLabel, CLabel )
 import Digraph         ( stronglyConnComp, SCC(..) )
 import HeapOffs                ( possiblyEqualHeapOffset )
 import Id              ( fIRST_TAG, SYN_IE(ConTag) )