在Common Lisp中将FUNCTION转换为STRING或SYMBOL

Question

常见的lisp是否可以将函数转换为符号或字符串以供进一步使用？我的意思是从"+"获得#:|+|或#'+。

Answer 1

唯一的标准方法是 function-lambda-expression 不保证不能返回任何有用的信息。

无论如何，CLISP和SBCL都返回实际的函数名称：

(nth-value 2 (function-lambda-expression #'+))
==> +

或者，如果您愿意，

(symbol-name (nth-value 2 (function-lambda-expression #'+)))
==> "+"

Answer 2

CL-USER> (nth-value 2 (function-lambda-expression #'sin))
SIN

Answer 3

(defun function-name (fn)
  (string-downcase (symbol-name (nth-value 2 (function-lambda-expression fn)))))

(function-name #'atom) => "atom"