From 02a8271b2bc558c60fb9bd88d87a1a417f2bf3d1 Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Sun, 8 Feb 1998 16:20:59 +0000 Subject: [PATCH] Correct the compiler-let binding spec within the with-alien macro. --- code/alieneval.lisp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/code/alieneval.lisp b/code/alieneval.lisp index 62f2d5d9b..694b2a045 100644 --- a/code/alieneval.lisp +++ b/code/alieneval.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/alieneval.lisp,v 1.43 1998/02/06 19:48:01 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/alieneval.lisp,v 1.44 1998/02/08 16:20:59 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1428,9 +1428,9 @@ (dispose-local-alien ',info ,var) ))))))))))) (verify-local-auxiliaries-okay) - `(compiler-let (*auxiliary-type-definitions* - ',(append *new-auxiliary-types* - *auxiliary-type-definitions*)) + `(compiler-let ((*auxiliary-type-definitions* + ',(append *new-auxiliary-types* + *auxiliary-type-definitions*))) ,@body))) -- GitLab