From 5ea4f2dece4fd3e7aa3343db151cdab78ce9db62 Mon Sep 17 00:00:00 2001
From: Pekka Pirinen <pekka@harlequin.com>
Date: Wed, 17 May 2000 15:22:48 +0100
Subject: [PATCH] Used bogus var to count

Copied from Perforce
 Change: 21201
 ServerID: perforce.ravenbrook.com
---
 mps/qa/function/31.c | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/mps/qa/function/31.c b/mps/qa/function/31.c
index 9ab778add51..cb7577a3106 100644
--- a/mps/qa/function/31.c
+++ b/mps/qa/function/31.c
@@ -1,6 +1,6 @@
 /* 
 TEST_HEADER
- id = $HopeName$
+ id = $HopeName: MMQA_test_function!31.c(trunk.4) $
  summary = regression test for request.dylan.170459 (scanning and buffers in AWL)
  language = c
  link = testlib.o awlfmt.o
@@ -12,8 +12,10 @@ END_HEADER
 #include "mpscamc.h"
 #include "awlfmt.h"
 
+
 void *stackpointer;
 
+
 static void test(void)
 {
  mps_space_t space;
@@ -27,7 +29,6 @@ static void test(void)
  mycell *a, *b, *c;
 
  int i;
- int j;
 
  alloccomments = 1;
  fixcomments = 1;
@@ -73,7 +74,8 @@ static void test(void)
 
  for(i=0; i<1000; i++) {
   b = allocdumb(apamc, 0x400*1024, 0);
-  comment("%i of 1000.", j);
+  if (i % 50 == 0)
+    comment("%d of 1000.", i);
  }
 
  mps_ap_destroy(apawl);
@@ -95,9 +97,9 @@ static void test(void)
 
  mps_space_destroy(space);
  comment("Destroyed space.");
-
 }
 
+
 int main(void)
 {
  void *m;