From e2db5788739174fe304620fbff9e12eda3c0d976 Mon Sep 17 00:00:00 2001 From: pw <pw> Date: Fri, 1 Sep 2000 16:38:05 +0000 Subject: [PATCH] Fix define-walker-template for compiler-let to target ext:compiler-let. --- pcl/walk.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/pcl/walk.lisp b/pcl/walk.lisp index 62af126b1..f1e96344e 100644 --- a/pcl/walk.lisp +++ b/pcl/walk.lisp @@ -26,7 +26,7 @@ ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/walk.lisp,v 1.17 2000/07/06 08:47:10 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/walk.lisp,v 1.18 2000/09/01 16:38:05 pw Exp $") ;;; ;;; A simple code walker, based IN PART on: (roll the credits) ;;; Larry Masinter's Masterscope @@ -392,7 +392,7 @@ (define-walker-template BLOCK (NIL NIL REPEAT (EVAL))) (define-walker-template CATCH (NIL EVAL REPEAT (EVAL))) -(define-walker-template COMPILER-LET walk-compiler-let) +(define-walker-template ext:COMPILER-LET walk-compiler-let) (define-walker-template DECLARE walk-unexpected-declare) (define-walker-template EVAL-WHEN (NIL QUOTE REPEAT (EVAL))) (define-walker-template FLET walk-flet) -- GitLab