lisp - Lisp 中的关联列表 - 从中​​获取键的所有条目

Question

在 Common Lisp 中，有没有办法从alist匹配给定的键中检索所有条目？

Answer 1

(remove 'a '((a 1) (a 2) (b 1))
        :test-not #'eql
        :key #'first)

->

((A 1) (A 2))

Answer 2

如果您有关联列表a：

(defvar a '((a 1) (a 2) (b 1)))

a你可以通过调用 remove-if-not来保留所有有 car 的对：

(remove-if-not (lambda (x) (eq (car x) 'a)) a)

这导致：

((A 1) (A 2))

即使当被视为关联列表时，也只会返回其中的第一个。