add option --target=5.1 to generate Lua 5.1 compatible codes. add const destructure. make import item const by default.

8 files changed, 44 insertions, 17 deletions

diff --git a/spec/outputs/destructure.lua b/spec/outputs/destructure.lua
index 2fe4ba9..59ee358 100644
--- a/spec/outputs/destructure.lua
+++ b/spec/outputs/destructure.lua
@@ -26,7 +26,7 @@ do
                 local _obj_0 = yeah
                 a, b, c, d = _obj_0.a, _obj_0.b, _obj_0.c, _obj_0.d
         end
-        local _ = two
+        b = two
         a = one[1]
         c = nil
         b = one[1]
@@ -56,7 +56,10 @@ do
         end
         do
                 a = tbl
-                b, c = _.b, _.c
+                do
+                        local _obj_0 = _
+                        b, c = _obj_0.b, _obj_0.c
+                end
         end
         do
                 b = _
@@ -386,3 +389,21 @@ do
                 a.c = _tmp_1
         end
 end
+do
+        local width, height
+        do
+                local _obj_0 = View.size
+                width, height = _obj_0.width, _obj_0.height
+        end
+        local x, y
+        do
+                local _obj_0 = point
+                x, y = _obj_0.x, _obj_0.y
+                if x == nil then
+                        x = 0.0
+                end
+                if y == nil then
+                        y = 0.0
+                end
+        end
+end
diff --git a/spec/outputs/export.lua b/spec/outputs/export.lua
index 84e5424..962f18c 100644
--- a/spec/outputs/export.lua
+++ b/spec/outputs/export.lua
@@ -134,7 +134,10 @@ f((function()
         local _accum_0 = { }
         local _len_0 = 1
         for k, v in pairs(tb) do
-                _accum_0[_len_0] = k, v
+                _accum_0[_len_0] = {
+                        k,
+                        v
+                }
                 _len_0 = _len_0 + 1
         end
         return _accum_0
@@ -232,7 +235,10 @@ _ = tostring((function()
         local _accum_0 = { }
         local _len_0 = 1
         for k, v in pairs(tb) do
-                _accum_0[_len_0] = k, v
+                _accum_0[_len_0] = {
+                        k,
+                        v
+                }
                 _len_0 = _len_0 + 1
         end
         return _accum_0
diff --git a/spec/outputs/import.lua b/spec/outputs/import.lua
index 65e703f..6979e47 100644
--- a/spec/outputs/import.lua
+++ b/spec/outputs/import.lua
@@ -94,7 +94,7 @@ do
         b = getmetatable(require("m")).__a
         local _obj_0 = require("m")
         local f = _obj_0.e
-        b = getmetatable(_obj_0).__a
+        c = getmetatable(_obj_0).__a
         local d = require("m").c
         local g, i
         do
diff --git a/spec/outputs/macro.lua b/spec/outputs/macro.lua
index c19b2d7..fbc1d48 100644
--- a/spec/outputs/macro.lua
+++ b/spec/outputs/macro.lua
@@ -282,7 +282,8 @@ print("current line: " .. tostring(268));
 do
         print(1)
 end
-_ = function()
+local _1
+_1 = function()
         print(1)
         local _accum_0 = { }
         local _len_0 = 1
diff --git a/spec/outputs/metatable.lua b/spec/outputs/metatable.lua
index 935202c..2d72e1d 100644
--- a/spec/outputs/metatable.lua
+++ b/spec/outputs/metatable.lua
@@ -65,7 +65,6 @@ end
 setmetatable(a.b, { })
 x.abc = 123
 setmetatable(func(), mt)
-local _ = extra
 setmetatable(b.c, mt)
 a, d, e = 1, "abc"
 local is_same = getmetatable(a).__index == getmetatable(a).__index
diff --git a/spec/outputs/syntax.lua b/spec/outputs/syntax.lua
index 24b78c6..a4cb8e2 100644
--- a/spec/outputs/syntax.lua
+++ b/spec/outputs/syntax.lua
@@ -56,10 +56,10 @@ something("else")
 _ = something([[hey]]) * 2
 _ = something([======[hey]======]) * 2
 _ = something[ [======[hey]======]] * 2
-_ = something('else'), 2
-_ = something("else"), 2
-_ = something([[else]]), 2
-_ = something[ [[else]]], 2
+_, _ = something('else'), 2
+_, _ = something("else"), 2
+_, _ = something([[else]]), 2
+_, _ = something[ [[else]]], 2
 something('else', 2)
 something("else", 2)
 something([[else]], 2)
@@ -165,7 +165,7 @@ x = #{
                 2
         }
 }
-_ = hello, world
+_, _ = hello, world
 something:hello(what)(a, b)
 something:hello(what)
 something.hello:world(a, b)
diff --git a/spec/outputs/tables.lua b/spec/outputs/tables.lua
index 1d28a43..e9df1c4 100644
--- a/spec/outputs/tables.lua
+++ b/spec/outputs/tables.lua
@@ -187,18 +187,18 @@ k = {
         ["hello"] = "world",
         ["one"] = "zone"
 }
-local f = "one", {
+local f1, f2, f3 = "one", {
         ["two"] = three
 }, "four"
-f = {
+f1, f2 = {
         ["two"] = three
 }, "four"
-f = {
+f1 = {
         "one",
         ["two"] = three,
         "four"
 }
-local j = "one", {
+local j1, j2, j3, j4 = "one", {
         ["two"] = three,
         ["four"] = five
 }, 6, 7
diff --git a/spec/outputs/with.lua b/spec/outputs/with.lua
index 9dcaca3..304d26e 100644
--- a/spec/outputs/with.lua
+++ b/spec/outputs/with.lua
@@ -54,7 +54,7 @@ do
 end
 do
         do
-                local _with_0 = a, b
+                local _with_0 = a
                 print(_with_0.world)
         end
         local mod