10 lines
235 B
Text
10 lines
235 B
Text
(lib 'hash)
|
|
|
|
(define H (make-hash))
|
|
(define keys '(elvis simon antoinette))
|
|
(define kvalues '("the king" "gallubert" "de gabolde d'Audan"))
|
|
|
|
(list->hash (map cons keys kvalues) H)
|
|
→ #hash:3
|
|
(hash-ref H 'elvis)
|
|
→ "the king"
|