From 88fdb78838109386f94bf90441658c7f8b424543 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 23 Oct 2002 02:03:13 +0000
Subject: [PATCH] Rewrite loop in Prim_microcode_library_path to work around
 bug in IBM C compiler 3.6.5.

---
 v7/src/microcode/boot.c | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/v7/src/microcode/boot.c b/v7/src/microcode/boot.c
index 90718fe4b..9a8b2bba1 100644
--- a/v7/src/microcode/boot.c
+++ b/v7/src/microcode/boot.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: boot.c,v 9.107 2002/07/02 20:49:05 cph Exp $
+$Id: boot.c,v 9.108 2002/10/23 02:03:13 cph Exp $
 
 Copyright (c) 1988-2002 Massachusetts Institute of Technology
 
@@ -647,11 +647,11 @@ DEFINE_PRIMITIVE ("MICROCODE-LIBRARY-PATH", Prim_microcode_library_path, 0, 0, 0
     CONST char ** scan = option_library_path;
     CONST char ** end = option_library_path;
     while (1)
-      if ((*end++) == 0)
-	{
-	  end -= 1;
+      {
+	if ((*end) == 0)
 	  break;
-	}
+	end += 1;
+      }
     {
       SCHEME_OBJECT result =
 	(allocate_marked_vector (TC_VECTOR, (end - scan), 1));
-- 
2.25.1