lisp - 根据值从 plist 打印键？

Question

我如何根据给定值迭代和打印 plist 的键？

例子:

; plist
(defun my-list() (list :a "hi" :b "no" :c "go"))

; from that list i want to iterate and print out keys based on values like:
for each x in ("hi" "go") print x

; hoping for:
ac

我是 lisp 的新手 - 谢谢 :-)

Answer 1

有点像

(loop for (key value) on my-list by #'cddr
      when (member value '("hi" "go") :test #'equal)
      do (princ key))

第一行在列表中移动一个模式。