Emacs Lisp Macro不扩展

Question

下面是我的宏，它应该做的是用来自body的绑定在let中包装一个vars-alist

(defmacro with-vars-alist (vars-alist &rest body)
  `(let (,@(mapcar (lambda (cell) (list (car cell) (cdr cell))) vars-alist))
     ,@body))

当我看到它扩展到使用以下代码时

(defvar my-vars-alist '((var1 . "var1")
                        (var2 . "var2")))
(macroexpand-1 (with-vars-alist my-vars-alist `(concat ,var1 ,var2)))

我得到一个错误cons: Wrong type argument: sequencep, my-vars-alist

但是，检查它，(sequencep my-vars-alist)返回t。

这个错误可能有一些简单的解决方案，但我就是找不到。

Answer 1

我看你想要做的是让-把一个乐手的键绑定到他们的值，这样你就可以用键作为变量在让体。在最近的Emacs中有一个内置宏：

(let-alist '((a . 1) (b . 2))
  (message "a: %d, b: %d" .a .b))