lisp - 普通口齿不清 : function A passes a function to B which passes it to C which invokes the function

Question

下面的helloworld函数简单的输出了Hello, world

(defun helloworld ()
    (format t "Hello, world"))

我创建了一个函数 A 将 helloworld 传递给函数 B:

(defun A ()
    (B #'helloworld))

函数 B 然后将函数传递给函数 C:

(defun B (fn)
    (C #'fn))

函数 C 然后调用该函数(即，它调用 helloworld):

(defun C (fn)
    (funcall fn))

当我运行程序时:

(A)

我收到此错误消息:

Error in FUNCTION [or a callee]: The function FN is undefined.

为什么？

我该如何解决？

Answer 1

(C #'fn)

这会寻找一个名为 fn 的函数，该函数由 defun、labels、flet 等创建。你有一个包含函数的变量，因此您应该将它转发到 C 而不是查找它的名称:

(defun B (fn)
    (C fn))
;     ^^ no #'

Live Demo