2.1 assoc-utils

Utilities for manipulating association lists

Author

Eitaro Fukamachi

License

Public Domain

Long Description

# Assoc-Utils

[](https://travis-ci.org/fukamachi/assoc-utils) [](https://coveralls.io/r/fukamachi/assoc-utils) [](http://quickdocs.org/assoc-utils/)

Utilities for manipulating association lists.

## Usage

### aget

“‘common-lisp
(defvar *person*
’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))

(aget *person* "name")
;=> "Eitaro"

(aget *person* "address")
;=> NIL

(aget *person* "address" "Tokyo, Japan")
;=> "Tokyo, Japan"

(setf (aget *person* "name") "Eitaro Fukamachi")

*person*
;=> (("name" . "Eitaro Fukamachi") ("email" . "e.arrows@gmail.com"))
“‘

### remove-from-alist & delete-from-alist

“‘common-lisp
(defvar *person*
’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))

(remove-from-alist *person* "name")
;=> (("email" . "e.arrows@gmail.com"))

;; Destructive version
(delete-from-alist *person* "name")
;=> (("email" . "e.arrows@gmail.com"))
“‘

### alist-plist & plist-alist

“‘common-lisp
(defvar *person*
’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))

(alist-plist *person*)
;=> (:NAME "Eitaro" :EMAIL "e.arrows@gmail.com")

(plist-alist ’(:name "Eitaro" :email "e.arrows@gmail.com"))
;=> (("name" . "Eitaro") ("email" . "e.arrows@gmail.com"))
“‘

### alist-hash & hash-alist

“‘common-lisp
(defvar *person*
’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))

(alist-hash *person*)
;=> #<HASH-TABLE :TEST EQUAL :COUNT 2 {1004329443}>

(hash-alist *)
;=> (("name" . "Eitaro") ("email" . "e.arrows@gmail.com"))
“‘

### alist-keys & alist-values

“‘common-lisp
(defvar *person*
’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))

(alist-keys *person*)
;=> ("name" "email")

(alist-values *person*)
;=> ("Eitaro" "e.arrows@gmail.com")
“‘

### alistp

“‘common-lisp
(alistp ’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")))
;=> T

(alistp 1)
;=> NIL

(alistp nil)
;=> T

;; Type: alist is also available
(typep ’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com")) ’alist)
;=> T
“‘

### alist=

“‘common-lisp
(alist= ’(("name" . "Eitaro") ("email" . "e.arrows@gmail.com"))
’(("email" . "e.arrows@gmail.com") ("name" . "Eitaro")))
;=> T
“‘

## Installation

“‘common-lisp
(ql:quickload :assoc-utils)
“‘

## Author

* Eitaro Fukamachi (e.arrows@gmail.com)

## License

Assoc-Utils is free and unencumbered software released into the public domain.

Version

0.1

Source

assoc-utils.asd.

Child Component

src (module).

3.1 assoc-utils/src

Source

assoc-utils.asd.

Parent Component

assoc-utils (system).

Child Component

assoc-utils.lisp (file).

4.1 Lisp

• assoc-utils/assoc-utils.asd
• assoc-utils/src/assoc-utils.lisp

5.1 assoc-utils-asd

Source

assoc-utils.asd.

Use List

• asdf/interface.
• common-lisp.

5.2 assoc-utils

Source

assoc-utils.lisp.

Use List

common-lisp.

Public Interface

• *assoc-test* (special variable).
• (setf aget) (setf expander).
• aget (function).
• alist (type).
• alist-hash (function).
• alist-keys (function).
• alist-plist (function).
• alist-values (function).
• alist= (function).
• alistp (function).
• delete-from-alist (function).
• delete-from-alistf (macro).
• hash-alist (function).
• plist-alist (function).
• remove-from-alist (function).
• remove-from-alistf (macro).

Internals

%aput (function).

6.1 Public Interface

• Special variables
• Macros
• Ordinary functions
• Types

6.2 Internals

• Ordinary functions