From ef890229f8624b2b59fa8c454fd4735bbd8feff5 Mon Sep 17 00:00:00 2001
From: Richard Tucker <rit@harlequin.com>
Date: Tue, 10 Nov 1998 10:44:05 +0000
Subject: [PATCH] Mend bug in which checklevel is set too high at end of loop

Copied from Perforce
 Change: 20346
 ServerID: perforce.ravenbrook.com
---
 mps/qa/function/93.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/mps/qa/function/93.c b/mps/qa/function/93.c
index 04404057a55..d97ec4ea533 100644
--- a/mps/qa/function/93.c
+++ b/mps/qa/function/93.c
@@ -1,6 +1,6 @@
 /* 
 TEST_HEADER
- id = $HopeName$
+ id = $HopeName: MMQA_test_function!93.c(trunk.2) $
  summary = EPVM time allocations with checklevels
  language = c
  link = testlib.o epvmfmt.o
@@ -74,6 +74,7 @@ static void test(void)
   for (CheckLevel = CheckNONE; CheckLevel <= CheckDEEP; CheckLevel ++) {
    timealloc(pool1, ap1s, size, 10000, 1);
   }
+  CheckLevel = CheckDEEP;
  }
  
  mps_ap_destroy(ap1s);