fix test.

1 files changed, 282 insertions, 0 deletions

diff --git a/spec/outputs/lists.lua b/spec/outputs/lists.lua
new file mode 100644
index 0000000..581cc23
--- /dev/null
+++ b/spec/outputs/lists.lua
@@ -0,0 +1,282 @@
+local hi
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for _, x in ipairs({
+                1,
+                2,
+                3,
+                4
+        }) do
+                _accum_0[_len_0] = x * 2
+                _len_0 = _len_0 + 1
+        end
+        hi = _accum_0
+end
+local items = {
+        1,
+        2,
+        3,
+        4,
+        5,
+        6
+}
+local _
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for z in ipairs(items) do
+                if z > 4 then
+                        _accum_0[_len_0] = z
+                        _len_0 = _len_0 + 1
+                end
+        end
+        _ = _accum_0
+end
+local rad
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for a in ipairs({
+                1,
+                2,
+                3,
+                4,
+                5,
+                6
+        }) do
+                if good_number(a) then
+                        _accum_0[_len_0] = {
+                                a
+                        }
+                        _len_0 = _len_0 + 1
+                end
+        end
+        rad = _accum_0
+end
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for z in items do
+                for j in list do
+                        if z > 4 then
+                                _accum_0[_len_0] = z
+                                _len_0 = _len_0 + 1
+                        end
+                end
+        end
+        _ = _accum_0
+end
+require("util")
+local dump
+dump = function(x)
+        return print(util.dump(x))
+end
+local range
+range = function(count)
+        local i = 0
+        return coroutine.wrap(function()
+                while i < count do
+                        coroutine.yield(i)
+                        i = i + 1
+                end
+        end)
+end
+dump((function()
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in range(10) do
+                _accum_0[_len_0] = x
+                _len_0 = _len_0 + 1
+        end
+        return _accum_0
+end)())
+dump((function()
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in range(5) do
+                if x > 2 then
+                        for y in range(5) do
+                                _accum_0[_len_0] = {
+                                        x,
+                                        y
+                                }
+                                _len_0 = _len_0 + 1
+                        end
+                end
+        end
+        return _accum_0
+end)())
+local things
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in range(10) do
+                if x > 5 then
+                        for y in range(10) do
+                                if y > 7 then
+                                        _accum_0[_len_0] = x + y
+                                        _len_0 = _len_0 + 1
+                                end
+                        end
+                end
+        end
+        things = _accum_0
+end
+for x in ipairs({
+        1,
+        2,
+        4
+}) do
+        for y in ipairs({
+                1,
+                2,
+                3
+        }) do
+                if x ~= 2 then
+                        print(x, y)
+                end
+        end
+end
+for x in items do
+        print("hello", x)
+end
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in x do
+                _accum_0[_len_0] = x
+                _len_0 = _len_0 + 1
+        end
+        _ = _accum_0
+end
+local x
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in x do
+                _accum_0[_len_0] = x
+                _len_0 = _len_0 + 1
+        end
+        x = _accum_0
+end
+for x in ipairs({
+        1,
+        2,
+        4
+}) do
+        for y in ipairs({
+                1,
+                2,
+                3
+        }) do
+                if x ~= 2 then
+                        print(x, y)
+                end
+        end
+end
+local double
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for _index_0 = 1, #items do
+                local x = items[_index_0]
+                _accum_0[_len_0] = x * 2
+                _len_0 = _len_0 + 1
+        end
+        double = _accum_0
+end
+for _index_0 = 1, #double do
+        local x = double[_index_0]
+        print(x)
+end
+local cut
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for _index_0 = 1, #items do
+                local x = items[_index_0]
+                if x > 3 then
+                        _accum_0[_len_0] = x
+                        _len_0 = _len_0 + 1
+                end
+        end
+        cut = _accum_0
+end
+local hello
+do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for _index_0 = 1, #items do
+                local x = items[_index_0]
+                for _index_1 = 1, #items do
+                        local y = items[_index_1]
+                        _accum_0[_len_0] = x + y
+                        _len_0 = _len_0 + 1
+                end
+        end
+        hello = _accum_0
+end
+for _index_0 = 1, #hello do
+        local z = hello[_index_0]
+        print(z)
+end
+x = {
+        1,
+        2,
+        3,
+        4,
+        5,
+        6,
+        7
+}
+local _max_0 = -5
+for _index_0 = 2, _max_0 < 0 and #x + _max_0 or _max_0, 2 do
+        local y = x[_index_0]
+        print(y)
+end
+local _max_1 = 3
+for _index_0 = 1, _max_1 < 0 and #x + _max_1 or _max_1 do
+        local y = x[_index_0]
+        print(y)
+end
+for _index_0 = 2, #x do
+        local y = x[_index_0]
+        print(y)
+end
+for _index_0 = 1, #x, 2 do
+        local y = x[_index_0]
+        print(y)
+end
+for _index_0 = 2, #x, 2 do
+        local y = x[_index_0]
+        print(y)
+end
+local a, b, c = 1, 5, 2
+local _max_2 = b
+for _index_0 = a, _max_2 < 0 and #x + _max_2 or _max_2, c do
+        local y = x[_index_0]
+        print(y)
+end
+local normal
+normal = function(hello)
+        local _accum_0 = { }
+        local _len_0 = 1
+        for x in yeah do
+                _accum_0[_len_0] = x
+                _len_0 = _len_0 + 1
+        end
+        return _accum_0
+end
+local test = x(1, 2, 3, 4, 5)
+for _index_0 = 1, #test do
+        local thing = test[_index_0]
+        print(thing)
+end
+return function()
+        local _list_0 = rows
+        for _index_0 = 1, #_list_0 do
+                local row = _list_0[_index_0]
+                a = b
+        end
+end