Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/61d8ad7a2c27fa3e14aed219e652a06041b27536

>---------------------------------------------------------------

commit 61d8ad7a2c27fa3e14aed219e652a06041b27536
Author: Gabor Greif <[email protected]>
Date:   Sat Jan 7 11:25:05 2012 +0100

    use (GHC) idiomatic types

>---------------------------------------------------------------

 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



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

Reply via email to