diff options
Diffstat (limited to 'rts/Sparks.c')
-rw-r--r-- | rts/Sparks.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Sparks.c b/rts/Sparks.c index 93f641757e..7e2556d976 100644 --- a/rts/Sparks.c +++ b/rts/Sparks.c @@ -209,7 +209,7 @@ pruneSparkQueue (Capability *cap) cap->sparks_pruned++; } } else if (HEAP_ALLOCED(spark) && - (Bdescr(spark)->flags & BF_EVACUATED)) { + (Bdescr((P_)spark)->flags & BF_EVACUATED)) { if (closure_SHOULD_SPARK(spark)) { elements[botInd] = spark; // keep entry (new address) botInd++; |