[commit: ghc] ghc-7.6: some nats should be lnats (518f84d)

[Paolo Capriotti]

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 <marlowsd at gmail.com>
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;