local matcher = require 'matcher'
local parser  = require 'parser'

rawset(_G, 'TEST', true)

function TEST(script)
    local ast = parser:ast(script)
    assert(ast)
    local vm = matcher.vm(ast)
    assert(vm)
    local results = vm.results
    assert(results)
end

TEST [[
do
    x = 1
end
]]

TEST [[
return nil, 1, true, 'xx'
]]

TEST [[
return a
]]

TEST [[
retrun a.b:c(1, 2, ...)[1][name]
]]

TEST [[
return 1 + 1
]]

TEST [[
return -1
]]

TEST [[
return ...
]]

TEST [[
return function (a, b, ...)
end
]]

TEST [[
return {
    a = 1,
    b = {
        c = d,
        e = f,
    },
    g,
    h,
    1,
}
]]

TEST [[
::LABEL::
goto LABEL
goto NEXT
::NEXT::
]]

TEST [[
a, b, c = 1, 2, ...
]]

TEST [[
local a, b, c = 1, 2, ...
]]

TEST [[
a[#a+1] = 1
]]

TEST [[
xx(a, b, 2, 3, ...)
]]

TEST [[
if a then
elseif b then
elseif c then
else
end
]]

TEST [[
for i = 1, 10, 1 do
end
]]

TEST [[
for a, b, c in pairs(t) do
end
]]

TEST [[
while true do
end
]]

TEST [[
repeat
until true
]]

TEST [[
function xx:yy(a, b, c, ...)
end
]]

TEST [[
local function xx(a, b, c, ...)
end
]]

TEST [[
local v = 1
local function xx()
    print(v)
end
local v = 2
xx()
]]

TEST(io.load(ROOT / 'src' / 'matcher' / 'vm.lua'))