From cf6845428c2bd19c6e52d3a7577e2d2bfe55f95c Mon Sep 17 00:00:00 2001 From: sof Date: Tue, 23 Sep 2003 17:07:39 +0000 Subject: [PATCH 1/1] [project @ 2003-09-23 17:07:39 by sof] wibble --- ghc/rts/MBlock.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/rts/MBlock.c b/ghc/rts/MBlock.c index 4d4b1a3..8352d07 100644 --- a/ghc/rts/MBlock.c +++ b/ghc/rts/MBlock.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: MBlock.c,v 1.48 2003/09/19 09:04:09 simonmar Exp $ + * $Id: MBlock.c,v 1.49 2003/09/23 17:07:39 sof Exp $ * * (c) The GHC Team 1998-1999 * @@ -265,7 +265,7 @@ getMBlocks(nat n) static char* base_mblocks = (char*)0; static char* next_request = (char*)0; void* ret = (void*)0; - int i; + nat i; lnat size = MBLOCK_SIZE * n; -- 1.7.10.4