RosettaCodeData/Task/Associative-array-Iteration/LFE/associative-array-iteration...

8 lines
190 B
Plaintext

(let ((data '(#(key1 "foo") #(key2 "bar")))
(hash (: dict from_list data)))
(: dict fold
(lambda (key val accum)
(: io format '"~s: ~s~n" (list key val)))
0
hash))