From b81e2fca107295235965782fd9ee5d22422daa99 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 16 Jul 1987 00:51:08 +0000
Subject: [PATCH] Fix stupid typo from last change.

---
 v7/src/microcode/syntax.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/microcode/syntax.c b/v7/src/microcode/syntax.c
index 2dadfb7b3..d371e041c 100644
--- a/v7/src/microcode/syntax.c
+++ b/v7/src/microcode/syntax.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/syntax.c,v 1.4 1987/07/15 22:12:35 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/syntax.c,v 1.5 1987/07/16 00:51:08 cph Rel $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -626,7 +626,7 @@ struct levelstruct { char *last, *previous; };
 {									\
   if (stop_before) goto stop;						\
   (level -> last) = start;						\
-}
+} while (0)
 
 Built_In_Primitive (Prim_Scan_Sexps_Forward, 7, "SCAN-SEXPS-FORWARD", 0x17B)
 {
-- 
2.25.1