common-lisp - 如何在 Common Lisp 中内联函数

Question

有人可以告诉我如何在 Common Lisp 中内联一个函数吗？我有很多一直被调用的小函数，所以最好节省这些函数调用的成本。

例如，您将如何在“调用者”函数中内联“独立”函数？

(defun standalone ()
 (* 2 5))

(defun caller ()
 (standalone))

Answer 1

(declaim (inline standalone))

(defun standalone ()
 (* 2 5))

(defun caller ()
 (standalone))

文档是 here .

(但请记住，定义一个总是返回数字文字 10 的函数没有多大意义...)