refactor apart transfromers

Author: leafo

moonscript/cmd/lint.lua

@@ -65,6 +65,9 @@ do
       end
     end,
     lint_check_unused = function(self)
+      do
+        return 
+      end
       if not (self.lint_unused_names and next(self.lint_unused_names)) then
         return 
       end

moonscript/cmd/lint.moon

@@ -105,6 +105,7 @@ class LinterBlock extends Block
       @parent\lint_mark_used name
 
   lint_check_unused: =>
+    do return
     return unless @lint_unused_names and next @lint_unused_names
 
     names_by_position = {}

moonscript/parse.lua

@@ -27,10 +27,10 @@ Num = Space * (Num / function(v)
     v
   }
 end)
-local Indent, Cut, ensure, extract_line, mark, pos, flatten_or_mark, is_assignable, check_assignable, format_assign, format_single_assign, sym, symx, simple_string, wrap_func_arg, join_chain, flatten_string_chain, wrap_decorator, check_lua_string, self_assign
+local Indent, Cut, ensure, extract_line, mark, pos, flatten_or_mark, is_assignable, check_assignable, format_assign, format_single_assign, sym, symx, simple_string, wrap_func_arg, join_chain, wrap_decorator, check_lua_string, self_assign
 do
   local _obj_0 = require("moonscript.parse.util")
-  Indent, Cut, ensure, extract_line, mark, pos, flatten_or_mark, is_assignable, check_assignable, format_assign, format_single_assign, sym, symx, simple_string, wrap_func_arg, join_chain, flatten_string_chain, wrap_decorator, check_lua_string, self_assign = _obj_0.Indent, _obj_0.Cut, _obj_0.ensure, _obj_0.extract_line, _obj_0.mark, _obj_0.pos, _obj_0.flatten_or_mark, _obj_0.is_assignable, _obj_0.check_assignable, _obj_0.format_assign, _obj_0.format_single_assign, _obj_0.sym, _obj_0.symx, _obj_0.simple_string, _obj_0.wrap_func_arg, _obj_0.join_chain, _obj_0.flatten_string_chain, _obj_0.wrap_decorator, _obj_0.check_lua_string, _obj_0.self_assign
+  Indent, Cut, ensure, extract_line, mark, pos, flatten_or_mark, is_assignable, check_assignable, format_assign, format_single_assign, sym, symx, simple_string, wrap_func_arg, join_chain, wrap_decorator, check_lua_string, self_assign = _obj_0.Indent, _obj_0.Cut, _obj_0.ensure, _obj_0.extract_line, _obj_0.mark, _obj_0.pos, _obj_0.flatten_or_mark, _obj_0.is_assignable, _obj_0.check_assignable, _obj_0.format_assign, _obj_0.format_single_assign, _obj_0.sym, _obj_0.symx, _obj_0.simple_string, _obj_0.wrap_func_arg, _obj_0.join_chain, _obj_0.wrap_decorator, _obj_0.check_lua_string, _obj_0.self_assign
 end
 local build_grammar = wrap_env(debug_grammar, function(root)
   local _indent = Stack(0)

moonscript/parse.moon

@@ -29,7 +29,7 @@ Num = Space * (Num / (v) -> {"number", v})
   :Indent, :Cut, :ensure, :extract_line, :mark, :pos, :flatten_or_mark,
   :is_assignable, :check_assignable, :format_assign, :format_single_assign,
   :sym, :symx, :simple_string, :wrap_func_arg, :join_chain,
-  :flatten_string_chain, :wrap_decorator, :check_lua_string, :self_assign
+  :wrap_decorator, :check_lua_string, :self_assign
 } = require "moonscript.parse.util"
 
 

moonscript/parse/util.lua

@@ -197,17 +197,6 @@ join_chain = function(callee, args)
     args
   }
 end
-local flatten_string_chain
-flatten_string_chain = function(str, chain, args)
-  if not (chain) then
-    return str
-  end
-  return flatten_chain({
-    "chain",
-    str,
-    unpack(chain)
-  }, args)
-end
 local wrap_decorator
 wrap_decorator = function(stm, dec)
   if not (dec) then
@@ -254,7 +243,6 @@ return {
   simple_string = simple_string,
   wrap_func_arg = wrap_func_arg,
   join_chain = join_chain,
-  flatten_string_chain = flatten_string_chain,
   wrap_decorator = wrap_decorator,
   check_lua_string = check_lua_string,
   self_assign = self_assign

moonscript/parse/util.moon

@@ -139,10 +139,6 @@ join_chain = (callee, args) ->
 
   {"chain", callee, args}
 
-flatten_string_chain = (str, chain, args) ->
-  return str unless chain
-  flatten_chain {"chain", str, unpack chain}, args
-
 -- constructor for decorator node
 wrap_decorator = (stm, dec) ->
   return stm unless dec
@@ -157,5 +153,5 @@ self_assign = (name, pos) ->
 
 { :Indent, :Cut, :ensure, :extract_line, :mark, :pos, :flatten_or_mark,
   :is_assignable, :check_assignable, :format_assign, :format_single_assign,
-  :sym, :symx, :simple_string, :wrap_func_arg, :join_chain,
-  :flatten_string_chain, :wrap_decorator, :check_lua_string, :self_assign }
+  :sym, :symx, :simple_string, :wrap_func_arg, :join_chain, :wrap_decorator,
+  :check_lua_string, :self_assign }