projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.42.24: print symbols with fully qualified names in critical places
[sbcl.git]
/
src
/
pcl
/
macros.lisp
diff --git
a/src/pcl/macros.lisp
b/src/pcl/macros.lisp
index
996e05f
..
80dab6b
100644
(file)
--- a/
src/pcl/macros.lisp
+++ b/
src/pcl/macros.lisp
@@
-96,7
+96,8
@@
(ensure-non-standard-class symbol classoid))))))
(cond ((null errorp) nil)
((legal-class-name-p symbol)
(ensure-non-standard-class symbol classoid))))))
(cond ((null errorp) nil)
((legal-class-name-p symbol)
- (error "There is no class named ~S." symbol))
+ (error "There is no class named ~
+ ~/sb-impl::print-symbol-with-prefix/." symbol))
(t
(error "~S is not a legal class name." symbol)))))
(t
(error "~S is not a legal class name." symbol)))))