From f55b20817cc2f7e08c277b5c49d8b6528e2b81ee Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 14 Jun 1995 22:44:48 +0000
Subject: [PATCH] Fix typo in previous change.

---
 v7/src/compiler/base/macros.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/compiler/base/macros.scm b/v7/src/compiler/base/macros.scm
index 931454451..d74591922 100644
--- a/v7/src/compiler/base/macros.scm
+++ b/v7/src/compiler/base/macros.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: macros.scm,v 4.14 1995/04/24 22:30:44 adams Exp $
+$Id: macros.scm,v 4.15 1995/06/14 22:44:48 cph Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -95,7 +95,7 @@ MIT in each case. |#
 	       (make-definition name (make-unassigned-reference-trap)))
 	     names)
       ,(make-combination
-	(let ((block (syntax* (append body unspecific))))
+	(let ((block (syntax* (append body (list unspecific)))))
 	  (if (open-block? block)
 	      (open-block-components block
 		(lambda (names* declarations body)
-- 
2.25.1