Run tests on game before start on TIC-80

game_tester.lua

local testRunner = {
 tests = {
  test_foo = function() end,
  test_bar = function() end,
  test_zoo = function() end
 },
 init = function(self)
  self._tests = {}
  for n, f in pairs(self.tests) do
   table.insert(self._tests, {n, f})
  end
 end,
 idx = 1,
 fail = false,
 tic = function(self)
  if self.idx <= #self._tests then
   local n, f = table.unpack(self._tests[self.idx])
   local s, e = pcall(f)
   if s then
    trace("Testing " .. n .. " passed.", 5)
   else
    trace("Testing " .. n .. " failed: ", 3)
    trace(e, 3)
    self.fail = true
   end 
   self.idx = self.idx + 1
   name, func = next(self.tests)
  else
   if self.fail then
    cls(3)
    print('Tests are failed, check traceback')
    return 'FAILED'
   else
    return 'COMPLETED'
   end
  end
 end
}

-- Initialize tests -----------------

local TESTS_COMPLETED = false
testRunner:init()

function TIC()
 if READY == false then
  READY = testRunner:tic() == 'COMPLETED'
  return
 end
 cls()
 print("HELLO WORLD!",84,84)
end