Fixed some diagnostics warnings

Moved examples to tofix because fixing them is besides the point right
now.

06/deps/parser-gen/stack.lua

@@ -0,0 +1,66 @@
+-- Stack Table
+-- Uses a table as stack, use <table>:push(value) and <table>:pop()
+local unpack = table.unpack
+-- GLOBAL
+local Stack = {}
+
+-- Create a Table with stack functions
+function Stack:Create()
+
+  -- stack table
+  local t = {}
+  -- entry table
+  t._et = {}
+
+  -- push a value on to the stack
+  function t:push(...)
+    if ... then
+      local targs = {...}
+      -- add values
+      for _,v in ipairs(targs) do
+        table.insert(self._et, v)
+      end
+    end
+  end
+
+  -- pop a value from the stack
+  function t:pop(num)
+
+    -- get num values from stack
+    local num = num or 1
+
+    -- return table
+    local entries = {}
+
+    -- get values into entries
+    for i = 1, num do
+      -- get last entry
+      if #self._et ~= 0 then
+        table.insert(entries, self._et[#self._et])
+        -- remove last value
+        table.remove(self._et)
+      else
+        break
+      end
+    end
+    -- return unpacked entries
+    return unpack(entries)
+  end
+
+  -- get entries
+  function t:getn()
+    return #self._et
+  end
+
+  -- list values
+  function t:list()
+    for i,v in pairs(self._et) do
+      print(i, v)
+    end
+  end
+  return t
+end
+
+return {Stack=Stack}
+
+-- CHILLCODE™