summaryrefslogtreecommitdiff
path: root/ghc/includes/SMcopying.lh
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/includes/SMcopying.lh')
-rw-r--r--ghc/includes/SMcopying.lh11
1 files changed, 7 insertions, 4 deletions
diff --git a/ghc/includes/SMcopying.lh b/ghc/includes/SMcopying.lh
index 252fbfca9c..7667fb2d4b 100644
--- a/ghc/includes/SMcopying.lh
+++ b/ghc/includes/SMcopying.lh
@@ -84,7 +84,7 @@ extern StgScavFun _Scavenge_Data;
extern StgEvacFun _Evacuate_MuTuple;
extern StgScavFun _Scavenge_MuTuple;
-#ifdef PAR
+#if defined(PAR) || defined(GRAN)
extern StgEvacFun _Evacuate_RBH_2;
extern StgEvacFun _Evacuate_RBH_3;
extern StgEvacFun _Evacuate_RBH_4;
@@ -117,11 +117,14 @@ extern StgScavFun _Scavenge_RBH_12_12;
extern StgScavFun _Scavenge_RBH_N;
extern StgScavFun _Scavenge_FetchMe;
extern StgScavFun _Scavenge_BF;
-#else
-extern StgEvacFun _Evacuate_MallocPtr;
-extern StgScavFun _Scavenge_MallocPtr;
+#endif /* PAR || GRAN */
+
+#if !defined(PAR) || defined(GRAN)
+extern StgEvacFun _Evacuate_ForeignObj;
+extern StgScavFun _Scavenge_ForeignObj;
#endif /* PAR */
+
extern StgEvacFun _Evacuate_BH_N;
extern StgScavFun _Scavenge_BH_N;