From ca8fa16681e80d9d27e354edec35e50296de6d92 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Fri, 2 Jul 1993 20:41:09 +0000
Subject: [PATCH] special-form-p -> special-operator-p

---
 pcl/walk.lisp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/pcl/walk.lisp b/pcl/walk.lisp
index 237612395..c400fcb19 100644
--- a/pcl/walk.lisp
+++ b/pcl/walk.lisp
@@ -1352,6 +1352,9 @@
 			  newnewnewform)))
 		   ((and (symbolp fn)
 			 (not (fboundp fn))
+			 #+cmu17
+			 (special-operator-p fn)
+			 #-cmu17
 			 (special-form-p fn))
 		    (error
 		     "~S is a special form, not defined in the CommonLisp.~%~
-- 
GitLab