lib/array.fnl


1
2
3
4
5
6
7
8
9
10
11
12
13

(import-macros {: reduce} :lib.macro)

(fn concat [a b]
  (local copy
   (fn [a b]
     (reduce
      (fn [_ v c]
       (table.insert c v)
       c)
      b a)))
  (copy a b))

{: concat}