Skip to content
Snippets Groups Projects
Commit ca8fa166 authored by ram's avatar ram
Browse files

special-form-p -> special-operator-p

parent 89fdfe3e
No related branches found
No related tags found
No related merge requests found
...@@ -1352,6 +1352,9 @@ ...@@ -1352,6 +1352,9 @@
newnewnewform))) newnewnewform)))
((and (symbolp fn) ((and (symbolp fn)
(not (fboundp fn)) (not (fboundp fn))
#+cmu17
(special-operator-p fn)
#-cmu17
(special-form-p fn)) (special-form-p fn))
(error (error
"~S is a special form, not defined in the CommonLisp.~%~ "~S is a special form, not defined in the CommonLisp.~%~
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment