Eval ошибка - неправильный тип аргумента: listp

Question

Следующий код

(setq func 'concat) 
(apply func "a" "b") 

выдает следующее сообщение об ошибке

***Eval error*** Wrong type argument: listp, "b" 

Почему apply принимает все аргументы с третьей позиции в качестве аргументов, предназначенных для «FUNC»?

Answer 1

apply принимает список в качестве последнего аргумента, так что эти вызовы являются правильными:

(apply func "a" '("b")) 
(apply func '("a" "b")) 

Чтобы передать простые аргументы, вы можете использовать funcall вместо:

(funcall func "a" "b") 

В конце концов, вы можете также использовать apply следующего

(apply func "a" "b" nil) 

или

(apply func "a" "b"()) 

Это потому, что nil и () считаются пустыми списками в Emacs Lisp.

Answer 2

apply принимает функцию и список, так что используйте

(apply func '("a" "b")) 

Или просто

(func "a" "b") 

Answer 3

Типичным применением apply является применение одной функции к списку аргументов, а затем «распространение» этого списка по аргументам. С другой стороны, funcall необходим только потому, что elisp разделяет функцию и переменные привязки.

(defun wrapped-fun (fun a b) 
    "Wrapped-fun takes a function and two arguments. It first does something, 
    then calls fun with the two arguments, then finishes off doing 
    something else." 
    (do-something) 
    (funcall fun a b) ;; Had function and variable namespaces been the same 
         ;; this could've been just (fun a b) 
    (do-something-else))