Allow 'foo . (42)' calls

Author: Gustavo Dutra

lib/elixir/src/elixir_tokenizer.erl

@@ -232,8 +232,13 @@ tokenize([$.,T|Rest], Line, Scope, Tokens) when ?comp1(T); ?op1(T); T == $& ->
 % Dot call
 
 % ## Exception for .( as it needs to be treated specially in the parser
-tokenize([$.,$(|Rest], Line, Scope, Tokens) ->
-  tokenize([$(|Rest], Line, Scope, add_token_with_nl({ dot_call_op, Line, '.' }, Tokens));
+tokenize([$.,T1,T2|T], Line, Scope, Tokens) when T1 == $( ; (T1 == $\s andalso T2 == $() ->
+  Rest = case T1 of
+         $( -> [T1,T2|T];
+         % Ignores the space
+         $\s -> [T2|T]
+         end,
+  tokenize(Rest, Line, Scope, add_token_with_nl({ dot_call_op, Line, '.' }, Tokens));
 
 tokenize([$.,H|T], Line, #scope{file=File} = Scope, Tokens) when ?is_quote(H) ->
   case elixir_interpolation:extract(Line, File, true, T, H) of

lib/elixir/test/erlang/function_test.erl

@@ -88,6 +88,19 @@ function_calls_with_multiple_args_with_line_breaks_test() ->
 function_calls_with_parenthesis_test() ->
   {3, [{a,_},{b,1}]} = eval("a = (fn x -> x + 2 end).(b = 1)").
 
+function_call_with_a_single_space_test() ->
+  {3, _} = eval("a = fn a, b -> a + b end; a. (1,2)"),
+  {3, _} = eval("a = fn a, b -> a + b end; a .(1,2)").
+
+function_call_with_spaces_test() ->
+  {3, _} = eval("a = fn a, b -> a + b end; a . (1,2)").
+
+function_call_without_assigning_with_spaces_test() ->
+  {3, _} = eval("(fn a, b -> a + b end) . (1,2)").
+
+function_call_with_assignment_and_spaces_test() ->
+  {3, [{a,_},{c,3}]} = eval("a = fn x -> x + 2 end; c = a . (1)").
+
 %% Partial application
 
 require_partial_application_test() ->
@@ -96,4 +109,4 @@ require_partial_application_test() ->
 
 import_partial_application_test() ->
   { Fun, _ } = eval("is_atom(&1)"),
-  Fun = fun erlang:is_atom/1.
+  Fun = fun erlang:is_atom/1.