From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 20 Dec 2001 03:48:45 +0000 (+0000)
Subject: Fix problem caused by SCode-manipulating macro being closed in
X-Git-Tag: 20090517-FFI~2343
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=1102bda883155bbd622452df8a56526570113c8a;p=mit-scheme.git

Fix problem caused by SCode-manipulating macro being closed in
compiler environment.
---

diff --git a/v7/src/compiler/base/macros.scm b/v7/src/compiler/base/macros.scm
index 42335b302..2d755146f 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.18 2001/12/20 03:46:57 cph Exp $
+$Id: macros.scm,v 4.19 2001/12/20 03:48:45 cph Exp $
 
 Copyright (c) 1988-1999, 2001 Massachusetts Institute of Technology
 
@@ -74,7 +74,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
   (make-syntax-closure
    (scode/make-sequence
     `(,@(map (lambda (name)
-	       (make-definition name (make-unassigned-reference-trap)))
+	       (scode/make-definition name (make-unassigned-reference-trap)))
 	     names)
       ,(scode/make-combination
 	(let ((block (syntax* (append body (list unspecific)))))