Fix parenthesis problem, again.
authorMichael R. Blair <edu/mit/csail/zurich/ziggy>
Tue, 31 Aug 1993 00:52:44 +0000 (00:52 +0000)
committerMichael R. Blair <edu/mit/csail/zurich/ziggy>
Tue, 31 Aug 1993 00:52:44 +0000 (00:52 +0000)
v7/src/runtime/intrpt.scm

index 9ab72be06380dd7f30741db7a4ef8e0d5e57e987..e9f97910ca85f3c2379961b97bd1765721906222 100644 (file)
@@ -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)