library-mirrors/moonscript
1
0
Fork 0
mirror of https://github.com/leafo/moonscript.git synced 2024-11-22 02:44:23 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

rebuild

Browse Source
This commit is contained in:
leaf corcoran 2013-06-30 21:47:56 -07:00
parent bc2dee76b5
commit 7085304207
4 changed files with 12 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
moonscript/compile/statement.lua
View File

@ -140,9 +140,8 @@ local statement_compilers = {
current.next = next
current = next
end
local _list_0 = node
for _index_0 = 4, #_list_0 do
cond = _list_0[_index_0]
for _index_0 = 4, #node do
cond = node[_index_0]
add_clause(cond)
end
return root

10
moonscript/compile/value.lua
View File

@ -53,9 +53,8 @@ local value_compilers = {
_with_0:append_list((function()
local _accum_0 = { }
local _len_0 = 1
local _list_0 = node
for _index_0 = 2, #_list_0 do
local v = _list_0[_index_0]
for _index_0 = 2, #node do
local v = node[_index_0]
_accum_0[_len_0] = self:value(v)
_len_0 = _len_0 + 1
end
@ -115,9 +114,8 @@ local value_compilers = {
local actions
do
local _with_0 = self:line()
local _list_0 = node
for _index_0 = 3, #_list_0 do
local action = _list_0[_index_0]
for _index_0 = 3, #node do
local action = node[_index_0]
_with_0:append(chain_item(action))
end
actions = _with_0

5
moonscript/errors.lua
View File

@ -50,10 +50,9 @@ truncate_traceback = function(traceback, chunk_func)
do
local _accum_0 = { }
local _len_0 = 1
local _list_0 = traceback
local _max_0 = stop
for _index_0 = 1, _max_0 < 0 and #_list_0 + _max_0 or _max_0 do
local t = _list_0[_index_0]
for _index_0 = 1, _max_0 < 0 and #traceback + _max_0 or _max_0 do
local t = traceback[_index_0]
_accum_0[_len_0] = t
_len_0 = _len_0 + 1
end

10
moonscript/transform.lua
View File

@ -854,9 +854,8 @@ Statement = Transformer({
if "stm" == _exp_0 then
insert(statements, item[2])
elseif "props" == _exp_0 then
local _list_0 = item
for _index_1 = 2, #_list_0 do
local tuple = _list_0[_index_1]
for _index_1 = 2, #item do
local tuple = item[_index_1]
if ntype(tuple[1]) == "self" then
insert(statements, build.assign_one(unpack(tuple)))
else
@ -1074,9 +1073,8 @@ Statement = Transformer({
do
local _accum_0 = { }
local _len_0 = 1
local _list_0 = chain
for _index_0 = 3, #_list_0 do
local item = _list_0[_index_0]
for _index_0 = 3, #chain do
local item = chain[_index_0]
_accum_0[_len_0] = item
_len_0 = _len_0 + 1
end