Skip to content

Commit

Permalink
Fix typo
Browse files Browse the repository at this point in the history
  • Loading branch information
isakb committed Apr 8, 2013
1 parent 77ba1f6 commit 4f3fa4b
Show file tree
Hide file tree
Showing 2 changed files with 16 additions and 16 deletions.
16 changes: 8 additions & 8 deletions priv/neotoma_parse.peg
Original file line number Diff line number Diff line change
Expand Up @@ -31,7 +31,7 @@ declaration <- nonterminal space* '<-' space* parsing_expression space? code_blo
ets:insert_new(memo_table_name(),{gen_transform, true}),
["transform('",Symbol,"', Node, Idx)"]
end,
TransformArgs = case used_tranform_variables(Transform) of
TransformArgs = case used_transform_variables(Transform) of
[] -> "_Node, _Idx";
['Idx'] -> "_Node, Idx";
['Node'] -> "Node, _Idx";
Expand Down Expand Up @@ -248,19 +248,19 @@ verify_rules() ->
end, NTs),
Root.

used_tranform_variables(Transform) ->
used_transform_variables(Transform) ->
Code = unicode:characters_to_list(Transform),
{ok, Tokens, _} = erl_scan:string(Code),
used_tranform_variables(Tokens, []).
used_transform_variables(Tokens, []).

used_tranform_variables([{var, _, Name}|Tokens], Acc) ->
used_tranform_variables(Tokens, case Name of
used_transform_variables([{var, _, Name}|Tokens], Acc) ->
used_transform_variables(Tokens, case Name of
'Node' -> [Name | Acc];
'Idx' -> [Name | Acc];
_ -> Acc
end);
used_tranform_variables([_|Tokens], Acc) ->
used_tranform_variables(Tokens, Acc);
used_tranform_variables([], Acc) ->
used_transform_variables([_|Tokens], Acc) ->
used_transform_variables(Tokens, Acc);
used_transform_variables([], Acc) ->
lists:usort(Acc).
`
16 changes: 8 additions & 8 deletions src/neotoma_parse.erl
Original file line number Diff line number Diff line change
Expand Up @@ -71,20 +71,20 @@ verify_rules() ->
end, NTs),
Root.

used_tranform_variables(Transform) ->
used_transform_variables(Transform) ->
Code = unicode:characters_to_list(Transform),
{ok, Tokens, _} = erl_scan:string(Code),
used_tranform_variables(Tokens, []).
used_transform_variables(Tokens, []).

used_tranform_variables([{var, _, Name}|Tokens], Acc) ->
used_tranform_variables(Tokens, case Name of
used_transform_variables([{var, _, Name}|Tokens], Acc) ->
used_transform_variables(Tokens, case Name of
'Node' -> [Name | Acc];
'Idx' -> [Name | Acc];
_ -> Acc
end);
used_tranform_variables([_|Tokens], Acc) ->
used_tranform_variables(Tokens, Acc);
used_tranform_variables([], Acc) ->
used_transform_variables([_|Tokens], Acc) ->
used_transform_variables(Tokens, Acc);
used_transform_variables([], Acc) ->
lists:usort(Acc).

-spec file(file:name()) -> any().
Expand Down Expand Up @@ -131,7 +131,7 @@ parse(Input) when is_binary(Input) ->
ets:insert_new(memo_table_name(),{gen_transform, true}),
["transform('",Symbol,"', Node, Idx)"]
end,
TransformArgs = case used_tranform_variables(Transform) of
TransformArgs = case used_transform_variables(Transform) of
[] -> "_Node, _Idx";
['Idx'] -> "_Node, Idx";
['Node'] -> "Node, _Idx";
Expand Down

0 comments on commit 4f3fa4b

Please sign in to comment.