From bd660edeb783a74e5ca3f1f82713b2aeedae19dc Mon Sep 17 00:00:00 2001
From: Ben Gamari <ben@smart-cactus.org>
Date: Fri, 14 Jun 2019 11:15:16 -0400
Subject: [PATCH] rts: Assert that LDV profiling isn't used with parallel GC
I'm not entirely sure we are careful about ensuring this; this is a
last-ditch check.
---
rts/sm/Evac.c | 3 +++
1 file changed, 3 insertions(+)
diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c
index 7c82caa1856..53a473d26cf 100644
--- a/rts/sm/Evac.c
+++ b/rts/sm/Evac.c
@@ -1167,6 +1167,9 @@ selector_loop:
OVERWRITING_CLOSURE((StgClosure*)p);
SET_INFO((StgClosure*)p, &stg_WHITEHOLE_info);
write_barrier();
+#if defined(PARALLEL_GC)
+ abort(); // LDV is incompatible with parallel GC
+#endif
}
#endif
--
GitLab