Comment 2 for bug 1909659

Further reduced test case:

(defclass foo ()
  ((name :reader foo-name)))

(defun test ()
  (funcall (lambda () (foo-name (make-instance 'foo) nil))))