Further reduced test case:
(defclass foo () ((name :reader foo-name)))
(defun test () (funcall (lambda () (foo-name (make-instance 'foo) nil))))
Further reduced test case:
(defclass foo ()
((name :reader foo-name)))
(defun test ()
(funcall (lambda () (foo-name (make-instance 'foo) nil))))