@@ -110,25 +110,6 @@ defmodule ElixirScript.Translator.Call do
110110 { js_ast , env }
111111 end
112112
113-
114- def get_module_name_for_function ( module_name , env ) do
115- case module_name do
116- { :__aliases__ , _ , name } ->
117- module_name = Utils . quoted_to_name ( name )
118- get_js_name ( module_name , env )
119- { name , _ , _ } when is_atom ( name ) ->
120- get_js_name ( name , env )
121- { { :. , _ , [ _ , _ ] } , _ , _ } = ast ->
122- ast
123- { { :. , _ , [ { :__aliases__ , _ , _ } ] } , _ , _ } = ast ->
124- ast
125- ast when is_list ( ast ) ->
126- ast
127- name ->
128- get_js_name ( name , env )
129- end
130- end
131-
132113 def make_function_call ( module_name , function_name , [ ] , env ) when is_atom ( module_name ) and is_atom ( function_name ) do
133114 js_ast = JS . call_expression (
134115 JS . member_expression (
@@ -227,106 +208,4 @@ defmodule ElixirScript.Translator.Call do
227208
228209 { call , env }
229210 end
230-
231- def get_js_name ( [ Elixir | _ ] = list , _ ) do
232- list
233- end
234-
235- def get_js_name ( { :__aliases__ , _ , _ } = name , env ) do
236- Utils . quoted_to_name ( name )
237- |> get_js_name ( env )
238- end
239-
240- def get_js_name ( module_name , env ) when is_list ( module_name ) do
241- Utils . quoted_to_name ( { :__aliases__ , [ ] , module_name } )
242- |> get_js_name ( env )
243- end
244-
245- def get_js_name ( module_name , env ) do
246-
247- cond do
248- module_name in env . requires ->
249- Utils . name_to_js_name ( module_name )
250-
251- module_name in ElixirScript.Translator.State . list_module_names ( env . state ) ->
252- ElixirScript.Translator.State . add_module_reference ( env . state , env . module , module_name )
253- Utils . name_to_js_name ( module_name )
254-
255- true ->
256- case Atom . to_string ( module_name ) do
257- "Elixir." <> _ ->
258- { :__aliases__ , _ , name } = Utils . name_to_quoted ( module_name )
259- name
260- _ ->
261- module_name
262- end
263- end
264- end
265-
266- defp make_member_expression ( module_name , function_name , env , computed \\ false ) do
267- case module_name do
268- modules when is_list ( modules ) and length ( modules ) > 1 ->
269- ast = make_module_expression_tree ( modules , computed , env )
270- JS . member_expression (
271- ast ,
272- Identifier . make_identifier ( function_name ) ,
273- computed
274- )
275- modules when is_list ( modules ) and length ( modules ) == 1 ->
276- JS . member_expression (
277- Identifier . make_identifier ( hd ( modules ) ) ,
278- Identifier . make_identifier ( function_name ) ,
279- computed
280- )
281- { { :. , _ , [ _module_name , _function_name ] } , _ , _params } = ast ->
282- JS . member_expression (
283- Translator . translate! ( ast , env ) ,
284- Identifier . make_identifier ( function_name ) ,
285- computed
286- )
287- { { :. , _ , [ { :__aliases__ , _ , _ } ] } , _ , _ } = ast ->
288- JS . member_expression (
289- Translator . translate! ( ast , env ) ,
290- Identifier . make_identifier ( function_name ) ,
291- computed
292- )
293- { :. , _ , _ } = ast ->
294- JS . member_expression (
295- Translator . translate! ( ast , env ) ,
296- Identifier . make_identifier ( function_name ) ,
297- computed
298- )
299- _ ->
300- JS . member_expression (
301- Identifier . make_identifier ( module_name ) ,
302- Identifier . make_identifier ( function_name ) ,
303- computed
304- )
305- end
306- end
307-
308- defp make_module_expression_tree ( [ module ] , computed , env ) do
309- make_module_expression_tree ( module , computed , env )
310- end
311-
312- defp make_module_expression_tree ( modules , computed , _ ) when is_list ( modules ) do
313- Enum . reduce ( modules , nil , fn ( x , ast ) ->
314- case ast do
315- nil ->
316- JS . member_expression ( Identifier . make_identifier ( x ) , nil , computed )
317- % ESTree.MemberExpression { property: nil } ->
318- % { ast | property: Identifier . make_identifier ( x ) }
319- _ ->
320- JS . member_expression ( ast , Identifier . make_identifier ( x ) , computed )
321- end
322- end )
323- end
324-
325- defp make_module_expression_tree ( module , _ , _ ) when is_binary ( module ) or is_atom ( module ) do
326- Identifier . make_identifier ( module )
327- end
328-
329- defp make_module_expression_tree ( module , _ , env ) do
330- Translator . translate! ( module , env )
331- end
332211end
0 commit comments