Update fast-class-of.lisp
Update fast-class-of.lisp

class-of bug

(let ((a 1)) (defun foo () a))

(describe #'foo) -> error

class-of is not considering structures which don't have a template vector but a template symbol
,like in this case, an environment structure. Are there any others? These are tagged as structures
but, Are they valid?
binghe/cormanlisp,binghe/cormanlisp,binghe/cormanlisp,binghe/cormanlisp,sharplispers/cormanlisp,binghe/cormanlisp,sharplispers/cormanlisp,sharplispers/cormanlisp,sharplispers/cormanlisp,sharplispers/cormanlisp,binghe/cormanlisp,binghe/cormanlisp,binghe/cormanlisp,sharplispers/cormanlisp,sharplispers/cormanlisp,sharplispers/cormanlisp