X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FScav.c;h=6eba1e01a9cc34c919e6bc2ae37e700a6e86c6ba;hb=902be381a29af801582c93366528f7901a5da544;hp=83890cbabe6e98a5aaac7c0f4666b82cf813aa62;hpb=509b3987c361fef9715b646c8ac738ef8d2279cf;p=ghc-hetmet.git

diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c
index 83890cb..6eba1e0 100644
--- a/rts/sm/Scav.c
+++ b/rts/sm/Scav.c
@@ -1417,7 +1417,7 @@ scavenge_find_work (void)
     rtsBool did_something, did_anything;
     bdescr *bd;
 
-    gct->scav_local_work++;
+    gct->scav_find_work++;
 
     did_anything = rtsFalse;