With some let-conversion flavor: (defun foo (a x) (break "~a" x) (flet ((bar (x y) (print y x))) (declare (notinline bar)) (bar a 1)))
With some let-conversion flavor:
(defun foo (a x)
(break "~a" x)
(flet ((bar (x y) (print y x)))
(declare (notinline bar))
(bar a 1)))