【发布时间】:2012-05-25 05:56:15
【问题描述】:
我有以下代码:
(defun my-map (p l)
(mapcar (lambda (el) (p el)) l))
(defun test ()
(my-map (lambda (x) (+ x 1)) (list 1 2 3)))
(这是示例 - 不是我尝试编写的实际代码)。它抱怨它找不到函数 p:
Debugger entered--Lisp error: (void-function p)
(p el)
(lambda (el) (p el))(1)
mapcar((lambda (el) (p el)) (1 2 3))
my-map((lambda (x) (x + 1)) (1 2 3))
test()
eval((test) nil)
eval-expression((test) nil)
call-interactively(eval-expression nil nil)
recursive-edit()
debug(error (void-variable test))
eval(test nil)
eval-expression(test nil)
call-interactively(eval-expression nil nil
我猜它会将p 视为符号,而不是外部范围内的变量。如何让它发挥作用?
【问题讨论】:
-
@phils:你是对的(我投票关闭 - 奇怪的是我认为作者可以关闭它自己的问题作为重复)。