[PATCH] use (GHC) idiomatic types

Gabor Greif ggreif at gmail.com
Sat Jan 7 11:25:05 CET 2012


---
 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




More information about the Cvs-ghc mailing list