fix warning

9b6f3526 · Simon Marlow · 9de55417 · 9b6f3526
Commit 9b6f3526 authored May 25, 2010 by Simon Marlow
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

rts/Sparks.c rts/Sparks.c +1 -1

No files found.
--- 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++;