X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FArena.c;h=ba6774b39308850592fc1b674fc86eff2516ee4e;hb=7457757f193b28b5fe8fee01edbed012c2fda897;hp=f719400c9e4a0ddf814971d425c1dccbe8d8c238;hpb=2790095b12b98c8d9407edc7fb3a6abe77de7d00;p=ghc-hetmet.git diff --git a/ghc/rts/Arena.c b/ghc/rts/Arena.c index f719400..ba6774b 100644 --- a/ghc/rts/Arena.c +++ b/ghc/rts/Arena.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - $Id: Arena.c,v 1.1 2001/10/18 14:41:01 simonmar Exp $ + $Id: Arena.c,v 1.2 2002/07/17 09:21:49 simonmar Exp $ (c) The University of Glasgow 2001 Arena allocation. Arenas provide fast memory allocation at the @@ -24,6 +24,8 @@ #include "BlockAlloc.h" #include "Arena.h" +#include + // Each arena struct is allocated using malloc(). struct _Arena { bdescr *current;