@@ -66,16 +66,12 @@ apply_to_last = function(stms, fn)
6666 local _accum_0 = { }
6767 local _len_0 = 1
6868 for i , stm in ipairs (stms ) do
69- local _value_0
7069 if i == last_exp_id then
71- _value_0 = fn (stm )
70+ _accum_0 [ _len_0 ] = fn (stm )
7271 else
73- _value_0 = stm
74- end
75- if _value_0 ~= nil then
76- _accum_0 [_len_0 ] = _value_0
77- _len_0 = _len_0 + 1
72+ _accum_0 [_len_0 ] = stm
7873 end
74+ _len_0 = _len_0 + 1
7975 end
8076 return _accum_0
8177 end )()
@@ -463,19 +459,15 @@ local Statement = Transformer({
463459 local _list_0 = names
464460 for _index_0 = 1 , # _list_0 do
465461 local name = _list_0 [_index_0 ]
466- local _value_0
467462 if type (name ) == " table" then
468- _value_0 = name
463+ _accum_0 [ _len_0 ] = name
469464 else
470- _value_0 = {
465+ _accum_0 [ _len_0 ] = {
471466 " dot" ,
472467 name
473468 }
474469 end
475- if _value_0 ~= nil then
476- _accum_0 [_len_0 ] = _value_0
477- _len_0 = _len_0 + 1
478- end
470+ _len_0 = _len_0 + 1
479471 end
480472 return _accum_0
481473 end )()
@@ -485,11 +477,8 @@ local Statement = Transformer({
485477 local _list_0 = names
486478 for _index_0 = 1 , # _list_0 do
487479 local name = _list_0 [_index_0 ]
488- local _value_0 = type (name ) == " table" and name [2 ] or name
489- if _value_0 ~= nil then
490- _accum_0 [_len_0 ] = _value_0
491- _len_0 = _len_0 + 1
492- end
480+ _accum_0 [_len_0 ] = type (name ) == " table" and name [2 ] or name
481+ _len_0 = _len_0 + 1
493482 end
494483 return _accum_0
495484 end )()
@@ -711,21 +700,17 @@ local Statement = Transformer({
711700 local _accum_0 = { }
712701 local _len_0 = 1
713702 for i , name in ipairs (node .names ) do
714- local _value_0
715703 if ntype (name ) == " table" then
716704 do
717705 local _with_0 = NameProxy (" des" )
718706 local proxy = _with_0
719707 insert (destructures , destructure .build_assign (name , proxy ))
720- _value_0 = _with_0
708+ _accum_0 [ _len_0 ] = _with_0
721709 end
722710 else
723- _value_0 = name
724- end
725- if _value_0 ~= nil then
726- _accum_0 [_len_0 ] = _value_0
727- _len_0 = _len_0 + 1
711+ _accum_0 [_len_0 ] = name
728712 end
713+ _len_0 = _len_0 + 1
729714 end
730715 return _accum_0
731716 end )()
@@ -906,10 +891,8 @@ local Statement = Transformer({
906891 else
907892 _value_0 = tuple
908893 end
909- if _value_0 ~= nil then
910- _accum_0 [_len_0 ] = _value_0
911- _len_0 = _len_0 + 1
912- end
894+ _accum_0 [_len_0 ] = _value_0
895+ _len_0 = _len_0 + 1
913896 _continue_0 = true
914897 until true
915898 if not _continue_0 then
0 commit comments