From: ceriel <none@none>
Date: Fri, 12 May 1989 09:36:16 +0000 (+0000)
Subject: a trap from a routine called by the termination sequence could
X-Git-Tag: release-5-5~2432
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=13bc7e128d76922fb19054f046901839c97e676f;p=ack.git

a trap from a routine called by the termination sequence could
cause an infinite loop. This is prevented
---

diff --git a/lang/m2/libm2/halt.c b/lang/m2/libm2/halt.c
index ca98a6969..1b504f904 100644
--- a/lang/m2/libm2/halt.c
+++ b/lang/m2/libm2/halt.c
@@ -15,10 +15,8 @@ static int (*proclist[MAXPROCS])();
 
 _cleanup()
 {
-	register int i;
-
-	for (i = callindex; --i >= 0;) {
-		(*proclist[i])();
+	while (--callindex >= 0)
+		(*proclist[callindex])();
 	}
 	callindex = 0;
 }