diff --git a/ghc/compiler/absCSyn/AbsCLoop.lhi b/ghc/compiler/absCSyn/AbsCLoop.lhi
index 2d5f61d85da8e56020bd8cbe36ec07936d3abe04..b28900e54838be4d296dfeb8ea631c3efc17f3c7 100644
--- a/ghc/compiler/absCSyn/AbsCLoop.lhi
+++ b/ghc/compiler/absCSyn/AbsCLoop.lhi
@@ -21,12 +21,13 @@ import ClosureInfo	( closureKind, closureLabelFromCI,
 			  entryLabelFromCI,fastLabelFromCI,
 			  ClosureInfo
 			)
-import CLabel		( CLabel )
+import CLabel		( mkReturnPtLabel, CLabel )
 import HeapOffs		( HeapOffset )
 import Id		( Id(..) )
 import MachMisc		( fixedHdrSizeInWords, varHdrSizeInWords )
 import SMRep		( SMRep )
 import TyCon		( TyCon )
+import Unique		( Unique )
 
 closureKind :: ClosureInfo -> [Char]
 closureLabelFromCI :: ClosureInfo -> CLabel
@@ -42,6 +43,8 @@ fastLabelFromCI :: ClosureInfo -> CLabel
 infoTableLabelFromCI :: ClosureInfo -> CLabel
 maybeSelectorInfo :: ClosureInfo -> Maybe (Id, Int)
 
+mkReturnPtLabel :: Unique -> CLabel
+
 ctrlReturnConvAlg :: TyCon -> CtrlReturnConvention
 data CtrlReturnConvention   = VectoredReturn Int | UnvectoredReturn Int