---
 includes/rts/storage/GC.h |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/includes/rts/storage/GC.h b/includes/rts/storage/GC.h
index fef8e00..26c5593 100644
--- a/includes/rts/storage/GC.h
+++ b/includes/rts/storage/GC.h
@@ -67,7 +67,7 @@ typedef struct nursery_ {
 } nursery;
 
 typedef struct generation_ {
-    unsigned int   no;                 // generation number
+    nat            no;                 // generation number
 
     bdescr *       blocks;             // blocks in this gen
     memcount       n_blocks;            // number of blocks
@@ -85,9 +85,9 @@ typedef struct generation_ {
     struct generation_ *to;            // destination gen for live objects
 
     // stats information
-    unsigned int collections;
-    unsigned int par_collections;
-    unsigned int failed_promotions;
+    nat collections;
+    nat par_collections;
+    nat failed_promotions;
 
     // ------------------------------------
     // Fields below are used during GC only
-- 
1.7.7.4


_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to