8 lines
120 B
Text
8 lines
120 B
Text
(defvarl h (hash))
|
|
|
|
(each ((k '(a b c))
|
|
(v '(1 2 3)))
|
|
(set [h k] v))
|
|
|
|
(dohash (k v h)
|
|
(put-line `@k -> @v`))
|