qlib.lua

local X = {}

function len(t)
  local i = 1
  while t[i] ~= nil do i = i + 1 end
  return i
end
X.len = len

function keysvals(t)
  local i = 1
  local ks = {}
  local vs = {}
  for k,v in pairs(t) do
    ks[i] = k; vs[i] = v; i = i + 1
  end
  return ks,vs
end
X.keysvals = keysvals

function tprint(t)
  local i = 1
  local ks
  local vs
  local v
  ks,vs = keysvals(t)
  while ks[i] ~= nil do
    v = vs[i]
    if type(v) == "boolean" then
      v = if v then "true" else "false" end
    elseif not (type(v) == "number" or type(v) == "string") then
      v = type(v)
    end
    print(ks[i].." : "..v)
  end
end
X.tprint = tprint

return X