From 5545c25ea7276bd13ad2f18ff96d4afc993e9a14 Mon Sep 17 00:00:00 2001
From: luk3yx <luk3yx@users.noreply.github.com>
Date: Sun, 22 Nov 2020 18:09:18 +1300
Subject: [PATCH] Fix tests.lua

---
 tests.lua | 25 +++++++++++++++++++++----
 1 file changed, 21 insertions(+), 4 deletions(-)

diff --git a/tests.lua b/tests.lua
index efa7d6a..21c9303 100644
--- a/tests.lua
+++ b/tests.lua
@@ -1,5 +1,22 @@
--- dofile('init.lua')
-dofile('test.lua')
+dofile('init.lua')
+
+local function dump(obj)
+    if type(obj) == 'string' then
+        return ('%q'):format(obj)
+    elseif type(obj) == 'table' then
+        local entries = {}
+        for k, v in pairs(obj) do
+            if type(k) == 'string' and k:match('^[a-zA-Z_][a-zA-Z0-9_]*$') then
+                entries[#entries + 1] = k .. ' = ' .. dump(v)
+            else
+                entries[#entries + 1] = '[' .. dump(k) .. '] = ' .. dump(v)
+            end
+        end
+        table.sort(entries)
+        return '{' .. table.concat(entries, ', ') .. '}'
+    end
+    return tostring(obj)
+end
 
 local function equal(t1, t2)
     if type(t1) ~= 'table' or type(t2) ~= 'table' then
@@ -11,7 +28,7 @@ local function equal(t1, t2)
             return false
         end
     end
-    for k, v in pairs(t2) do
+    for k in pairs(t2) do
         if t1[k] == nil then
             return false
         end
@@ -21,7 +38,7 @@ end
 
 local function assert_equal(obj1, ...)
     for i = 1, select('#', ...) do
-        objn = select(i, ...)
+        local objn = select(i, ...)
         if not equal(obj1, objn) then
             error(('%s ~= %s'):format(obj1, objn))
         end