Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Comparing changes

Choose two branches to see what's changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
base fork: erlang/otp
base: master
...
head fork: saa/otp
Checking mergeability… Don't worry, you can still create the pull request.
  • 1 commit
  • 1 file changed
  • 0 commit comments
  • 1 contributor
Commits on Apr 11, 2014
@saa saa Fix bug for get_value from maps tree
* map_field_exact_value/1
* map_field_assoc_value/1
084e335
Showing with 7 additions and 7 deletions.
  1. +7 −7 lib/syntax_tools/src/erl_syntax.erl
View
14 lib/syntax_tools/src/erl_syntax.erl
@@ -596,7 +596,7 @@ type(Node) ->
{b_generate, _, _, _} -> binary_generator;
{generate, _, _, _} -> generator;
{lc, _, _, _} -> list_comp;
- {bc, _, _, _} -> binary_comp;
+ {bc, _, _, _} -> binary_comp;
{match, _, _, _} -> match_expr;
{map, _, _, _} -> map_expr;
{map, _, _} -> map_expr;
@@ -2071,7 +2071,7 @@ map_field_assoc_value(Node) ->
{map_field_assoc, _, _, Value} ->
Value;
_ ->
- (data(Node))#map_field_assoc.name
+ (data(Node))#map_field_assoc.value
end.
@@ -2129,7 +2129,7 @@ map_field_exact_value(Node) ->
{map_field_exact, _, _, Value} ->
Value;
_ ->
- (data(Node))#map_field_exact.name
+ (data(Node))#map_field_exact.value
end.
@@ -2651,7 +2651,7 @@ compact_list(Node) ->
copy_attrs(Node,
Node1));
_ ->
- Node
+ Node
end
end;
_ ->
@@ -3172,7 +3172,7 @@ revert_attribute(Node) ->
revert_attribute_1(module, [M], Pos, Node) ->
case revert_module_name(M) of
- {ok, A} ->
+ {ok, A} ->
{attribute, Pos, module, A};
error -> Node
end;
@@ -3189,7 +3189,7 @@ revert_attribute_1(module, [M, List], Pos, Node) ->
Node
end,
case revert_module_name(M) of
- {ok, A} ->
+ {ok, A} ->
{attribute, Pos, module, {A, Vs}};
error -> Node
end;
@@ -6505,7 +6505,7 @@ subtrees(T) ->
Ts]
end;
binary_generator ->
- [[binary_generator_pattern(T)],
+ [[binary_generator_pattern(T)],
[binary_generator_body(T)]];
block_expr ->
[block_expr_body(T)];

No commit comments for this range

Something went wrong with that request. Please try again.