Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/abb875d921f3c89416e74513d41f54b5ed69d6bc >--------------------------------------------------------------- commit abb875d921f3c89416e74513d41f54b5ed69d6bc Author: Simon Marlow <[email protected]> Date: Fri Sep 7 13:35:27 2012 +0100 some nats should be lnats >--------------------------------------------------------------- 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 53c35c9..6098e79 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -1510,7 +1510,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
