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

7 lines
186 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
(let ((data '(#(key1 "foo") #(key2 "bar")))
(hash (: dict from_list data)))
(: lists map
(lambda (key)
(: io format '"~s~n" (list key)))
(: dict fetch_keys hash)))