Forked from
cmucl / cmucl
Source project has a limited visibility.
-
gerd authored
* src/pcl/methods.lisp (setf class-name) <before>: New method setting the kernel class' name. * src/code/pred.lisp (type-of): Don't return list function types. Return boolean for t, (integer n n) for integers, keyword for keywords, standard-char for standard characters. Return the CLOS class for classes not having a proper name.
gerd authored* src/pcl/methods.lisp (setf class-name) <before>: New method setting the kernel class' name. * src/code/pred.lisp (type-of): Don't return list function types. Return boolean for t, (integer n n) for integers, keyword for keywords, standard-char for standard characters. Return the CLOS class for classes not having a proper name.