dicts.fnl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

(local tea-type
  [{:value "white" :label "Белый"}
   {:value "dark-oolong" :label "Темный улун"}
   {:value "light-oolong" :label "Светлый улун"}
   {:value "red" :label "Красный"}
   {:value "green" :label "Зеленый"}
   {:value "shu-puerh" :label "Шу пуэр"}
   {:value "sheng-puerh" :label "Шэн пуэр"}])

(local tea-packaging
  [{:value "loose" :label "Россыпь"}
   {:value "piece" :label "Штучный товар"}
   {:value "pieces" :label "Разлом"}])

(fn label [dict value]
  (var result nil)
  (each [_ item (ipairs dict) &until result]
    (when (= item.value value)
      (set result item.label)))
  result)

{: tea-type : tea-packaging : label}