From 859839dd9a93af045f95189c039b17191ab9f988 Mon Sep 17 00:00:00 2001
From: David Walter Seikel
Date: Wed, 14 May 2014 15:54:44 +1000
Subject: Get list appending and adding to work.

---
 lib/LSL.lua | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

(limited to 'lib/LSL.lua')

diff --git a/lib/LSL.lua b/lib/LSL.lua
index 695c05d..092c3d9 100644
--- a/lib/LSL.lua
+++ b/lib/LSL.lua
@@ -871,5 +871,46 @@ function LSL.gimmeLSL()
   end
 end
 
+-- Misc support functions.
+
+function LSL.listAddList(a, b)
+  local i = 1
+  local result = {}
+
+  for j, v in ipairs(a) do
+    i = i + 1
+    table.insert(result, i, v)
+  end
+
+  for j, v in ipairs(b) do
+    i = i + 1
+    table.insert(result, i, v)
+  end
+
+  return result;
+end
+
+function LSL.listAdd(a, b)
+  local i = 1
+  local result = {}
+
+  for j, v in ipairs(a) do
+    i = i + 1
+    table.insert(result, i, v)
+  end
+
+  table.insert(result, i, b)
+
+  return result;
+end
+
+function LSL.listConcat(a, b)
+  local i = table.maxn(a)
+  local result = a
+
+  table.insert(result, i + 1, b)
+
+  return result;
+end
 
 return LSL;
-- 
cgit v1.1