library-mirrors/moonscript
1
0
Fork 0
mirror of https://github.com/leafo/moonscript.git synced 2025-01-09 00:04:22 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

oops, rebuild

Browse Source
This commit is contained in:
leaf corcoran 2013-01-12 15:18:44 -08:00
parent 0cf96b97f6
commit 1bff5ea9be
1 changed files with 13 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
moonscript/transform.lua
View File

@ -66,16 +66,12 @@ apply_to_last = function(stms, fn)
local _accum_0 = { }
local _len_0 = 1
for i, stm in ipairs(stms) do
local _value_0
if i == last_exp_id then
_value_0 = fn(stm)
_accum_0[_len_0] = fn(stm)
else
_value_0 = stm
end
if _value_0 ~= nil then
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
_accum_0[_len_0] = stm
end
_len_0 = _len_0 + 1
end
return _accum_0
end)()
@ -463,19 +459,15 @@ local Statement = Transformer({
local _list_0 = names
for _index_0 = 1, #_list_0 do
local name = _list_0[_index_0]
local _value_0
if type(name) == "table" then
_value_0 = name
_accum_0[_len_0] = name
else
_value_0 = {
_accum_0[_len_0] = {
"dot",
name
}
end
if _value_0 ~= nil then
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
end
_len_0 = _len_0 + 1
end
return _accum_0
end)()
@ -485,11 +477,8 @@ local Statement = Transformer({
local _list_0 = names
for _index_0 = 1, #_list_0 do
local name = _list_0[_index_0]
local _value_0 = type(name) == "table" and name[2] or name
if _value_0 ~= nil then
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
end
_accum_0[_len_0] = type(name) == "table" and name[2] or name
_len_0 = _len_0 + 1
end
return _accum_0
end)()
@ -711,21 +700,17 @@ local Statement = Transformer({
local _accum_0 = { }
local _len_0 = 1
for i, name in ipairs(node.names) do
local _value_0
if ntype(name) == "table" then
do
local _with_0 = NameProxy("des")
local proxy = _with_0
insert(destructures, destructure.build_assign(name, proxy))
_value_0 = _with_0
_accum_0[_len_0] = _with_0
end
else
_value_0 = name
end
if _value_0 ~= nil then
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
_accum_0[_len_0] = name
end
_len_0 = _len_0 + 1
end
return _accum_0
end)()
@ -906,10 +891,8 @@ local Statement = Transformer({
else
_value_0 = tuple
end
if _value_0 ~= nil then
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
end
_accum_0[_len_0] = _value_0
_len_0 = _len_0 + 1
_continue_0 = true
until true
if not _continue_0 then