如何跟踪本地函数

Question

我想跟踪一个本地函数，但是Lisp实现抱怨函数没有定义。

(defun calc (a)
  (flet ((inner-calc (a b)
         (+ a b)
         ))
    ;; body of flet
    (trace inner-calc)
    (inner-calc a 10)
    ))

(format t "Result: ~a~%" (calc 10))

我在MacOS上用clisp和sbcl尝试了这个。