X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2Fsm%2FGC.c;h=51eab4e2be7ee99fdeb8e926edc95705edec6393;hp=fb73180d0f83296c1cad4a4e73f5487950c32152;hb=af9e96991659185821632ff96383480c9dc9cbda;hpb=18a0ead12b605fd20c13f5255d78cfbf699fe0c4

diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index fb73180..51eab4e 100644
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -1247,7 +1247,7 @@ prepare_collected_gen (generation *gen)
 
     // for a compacted generation, we need to allocate the bitmap
     if (gen->mark) {
-        nat bitmap_size; // in bytes
+        lnat bitmap_size; // in bytes
         bdescr *bitmap_bdescr;
         StgWord *bitmap;