From 25571f49b1bc2ccba76dc5a2b4fee3efb7ab1e42 Mon Sep 17 00:00:00 2001
From: Richard Tucker <rit@harlequin.com>
Date: Mon, 22 Sep 1997 12:43:00 +0100
Subject: [PATCH] Shorten loop

Copied from Perforce
 Change: 18787
 ServerID: perforce.ravenbrook.com
---
 mps/qa/function/32.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mps/qa/function/32.c b/mps/qa/function/32.c
index 6bcf18b3070..cd3311656d4 100644
--- a/mps/qa/function/32.c
+++ b/mps/qa/function/32.c
@@ -63,7 +63,7 @@ static void test(void)
   a[i] = allocone(apawl, 6, 1);
  }
 
- for(i=0; i<100000; i++) {
+ for(i=0; i<10000; i++) {
   j = ranint(100);
   comment("New object %i", j);
   a[j] = allocone(apawl, 5+ranint(50), 1);