連想リスト

連想リスト

連想リストを定義する

-(setq trees '((pine . cones) (oak . acorns) (maple . seeds)))
;;=> ((pine . cones) (oak . acorns) (maple . seeds))

連想リストからエントリを取得する

(assoc 'oak '((pine . cones) (oak . acorns) (maple . seeds)))
;;=> (oak . acorns)

連想リストのキーから値を取得する

(alist-get 'oak '((pine . cones) (oak . acorns) (maple . seeds)))
;;=> acorns
(cdr (assq 'oak '((pine . cones) (oak . acorns) (maple . seeds))))
;;=> acorns

連想リストのキーの値を修正する

(setq alist '((pine . cones) (oak . acorns) (maple . seeds)))
;;=> ((pine . cones) (oak . acorns) (maple . seeds))
(setf (alist-get 'pine alist) 'pine-tree)
-;;=> pine-tree
alist
;;=>((pine . pine-tree) (oak . acorns) (maple . seeds))