From: Michael R. Blair <edu/mit/csail/zurich/ziggy>
Date: Tue, 31 Aug 1993 00:52:44 +0000 (+0000)
Subject: Fix parenthesis problem, again.
X-Git-Tag: 20090517-FFI~7950
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=e35a7af4ddf22042eb8b5d31daa2189e3d558eeb;p=mit-scheme.git

Fix parenthesis problem, again.
---

diff --git a/v7/src/runtime/intrpt.scm b/v7/src/runtime/intrpt.scm
index 9ab72be06..e9f97910c 100644
--- a/v7/src/runtime/intrpt.scm
+++ b/v7/src/runtime/intrpt.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: intrpt.scm,v 14.17 1993/08/31 00:35:02 ziggy Exp $
+$Id: intrpt.scm,v 14.18 1993/08/31 00:52:44 ziggy Exp $
 
 Copyright (c) 1988-93 Massachusetts Institute of Technology
 
@@ -217,9 +217,9 @@ MIT in each case. |#
 	   (if (not (vector-ref system-interrupt-vector i))
 	       (begin
 		 (vector-set! interrupt-mask-vector i
-			      (fix:not (fix:lsh 1 i))))
+			      (fix:not (fix:lsh 1 i)))
 		 (vector-set! system-interrupt-vector i
-			      illegal-interrupt-handler)))
+			      illegal-interrupt-handler))))
 
 	 (vector-set! interrupt-mask-vector stack-overflow-slot
 		      interrupt-mask/none)