From: mthomas <unknown>
Date: Wed, 23 Oct 2002 12:26:11 +0000 (+0000)
Subject: [project @ 2002-10-23 12:26:11 by mthomas]
X-Git-Tag: Approx_11550_changesets_converted~1521
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=9704f5440c245c491e3db19f80a0b116111ae088;hp=d12023f5581cedc96662e10be42c2f6819a64697

[project @ 2002-10-23 12:26:11 by mthomas]
Declare loop index i.
---

diff --git a/ghc/rts/MBlock.c b/ghc/rts/MBlock.c
index 9f0e89b..eb1c06d 100644
--- a/ghc/rts/MBlock.c
+++ b/ghc/rts/MBlock.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: MBlock.c,v 1.31 2002/10/21 12:42:31 simonmar Exp $
+ * $Id: MBlock.c,v 1.32 2002/10/23 12:26:11 mthomas Exp $
  *
  * (c) The GHC Team 1998-1999
  *
@@ -234,6 +234,7 @@ getMBlocks(nat n)
   static char* base_mblocks       = (char*)0;
   static char* next_request       = (char*)0;
   void* ret                       = (void*)0;
+  int i;
 
   lnat size = MBLOCK_SIZE * n;