Comment 2 for bug 1815203

Revision history for this message
Stas Boukarev (stassats) wrote :

(defun f367 (b)
  (flet ((%f7 ()
           (flet ((%f10 ()
                    (decf b b)))
             (declare (dynamic-extent #'%f10))
             (funcall (eval #'%f10)))))
    (declare (notinline %f7))
    (%f7)))