X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FArena.c;h=76ac23cf88d3e81c65e2208627fefc4c48cb2946;hb=d061776c476ef6f161749b27c3b4bda551c42c38;hp=2c478a70b7717a7d4c991fa51fd29a600657defc;hpb=94e06463420582cc2d336b39a297e82af39e4cc4;p=ghc-hetmet.git diff --git a/ghc/rts/Arena.c b/ghc/rts/Arena.c index 2c478a7..76ac23c 100644 --- a/ghc/rts/Arena.c +++ b/ghc/rts/Arena.c @@ -18,12 +18,13 @@ which most allocations are small. -------------------------------------------------------------------------- */ -#include #include "Rts.h" #include "RtsUtils.h" #include "BlockAlloc.h" #include "Arena.h" +#include + // Each arena struct is allocated using malloc(). struct _Arena { bdescr *current;