2

可能重复:
如何在 Elisp 中传递 lambda 表达式

我有以下代码:

(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

我猜它将 ap视为符号而不是外部范围内的变量。如何让它发挥作用?

4

1 回答 1

9

你想用funcall.

funcall 是“C 源代码”中的内置函数。

(funcall FUNCTION &rest ARGUMENTS)

将第一个参数作为函数调用,将剩余的参数传递给它。返回函数返回的值。因此,(funcall 'cons 'x 'y) 返回 (x . y)。

于 2012-05-25T06:16:07.263 回答