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

On branch  : ghc-7.6

http://hackage.haskell.org/trac/ghc/changeset/518f84dff8a250319531efa309fcfaa8ec378151

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

commit 518f84dff8a250319531efa309fcfaa8ec378151
Author: Simon Marlow <[email protected]>
Date:   Fri Sep 7 13:35:27 2012 +0100

    some nats should be lnats
    
    MERGED from commit abb875d921f3c89416e74513d41f54b5ed69d6bc

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

 rts/sm/GC.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index ab0ba64..dbc1263 100644
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -1552,7 +1552,7 @@ resize_generations (void)
     nat g;
 
     if (major_gc && RtsFlags.GcFlags.generations > 1) {
-       nat live, size, min_alloc, words;
+        lnat live, size, min_alloc, words;
        const nat max  = RtsFlags.GcFlags.maxHeapSize;
        const nat gens = RtsFlags.GcFlags.generations;
        



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

Reply via email to