From 9b82db238f9e2e02a76f95c793f8d6ef2387ecfd Mon Sep 17 00:00:00 2001
From: unwox <me@unwox.com>
Date: Thu, 26 Sep 2024 17:46:38 +0600
Subject: init

---
 lib/array.fnl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 lib/array.fnl

(limited to 'lib/array.fnl')

diff --git a/lib/array.fnl b/lib/array.fnl
new file mode 100644
index 0000000..11e4d2a
--- /dev/null
+++ b/lib/array.fnl
@@ -0,0 +1,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}
-- 
cgit v1.2.3