X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.h;h=5a9cb98c48bf624fd98081bde961180d3fe527be;hb=27a28cf6bc2196ee1690ac1fcc4d4c59d9b0d50f;hp=bc148401324be5696e0850ad09a23453a7f185d2;hpb=dbbf15c0f141357aa49b583286174867baadb821;p=ghc-hetmet.git

diff --git a/rts/sm/GC.h b/rts/sm/GC.h
index bc14840..5a9cb98 100644
--- a/rts/sm/GC.h
+++ b/rts/sm/GC.h
@@ -92,7 +92,7 @@ typedef struct step_workspace_ {
 
     // Objects that have already been, scavenged.
     bdescr *     scavd_list;
-    lnat         n_scavd_blocks;     // count of blocks in this list
+    nat          n_scavd_blocks;     // count of blocks in this list
 
     // Partially-full, scavenged, blocks
     bdescr *     part_list;