Skip to content

Commit

Permalink
parsetools: Replace TABs with spaces
Browse files Browse the repository at this point in the history
The files in the parsetools application are supposed to be
indented using spaces only. Remove the stray TABs that somehow
have crept in.
  • Loading branch information
bjorng committed Feb 16, 2010
1 parent 2b451b0 commit 08e2d74
Show file tree
Hide file tree
Showing 2 changed files with 11 additions and 11 deletions.
10 changes: 5 additions & 5 deletions lib/parsetools/include/yeccpre.hrl
Original file line number Diff line number Diff line change
Expand Up @@ -37,10 +37,10 @@ parse_and_scan({M, F, A}) ->
-spec(format_error/1 :: (any()) -> [char() | list()]).
format_error(Message) ->
case io_lib:deep_char_list(Message) of
true ->
Message;
_ ->
io_lib:write(Message)
true ->
Message;
_ ->
io_lib:write(Message)
end.

% To be used in grammar files to throw an error message to the parser
Expand Down Expand Up @@ -85,7 +85,7 @@ yeccpars1([Token | Tokens], Tzr, State, States, Vstack) ->
yeccpars1([], {{F, A},_Line}, State, States, Vstack) ->
case apply(F, A) of
{ok, Tokens, Endline} ->
yeccpars1(Tokens, {{F, A}, Endline}, State, States, Vstack);
yeccpars1(Tokens, {{F, A}, Endline}, State, States, Vstack);
{eof, Endline} ->
yeccpars1([], {no_func, Endline}, State, States, Vstack);
{error, Descriptor, _Endline} ->
Expand Down
12 changes: 6 additions & 6 deletions lib/parsetools/src/yeccparser.erl
Original file line number Diff line number Diff line change
Expand Up @@ -53,10 +53,10 @@ parse_and_scan({M, F, A}) ->
-spec(format_error/1 :: (any()) -> [char() | list()]).
format_error(Message) ->
case io_lib:deep_char_list(Message) of
true ->
Message;
_ ->
io_lib:write(Message)
true ->
Message;
_ ->
io_lib:write(Message)
end.

% To be used in grammar files to throw an error message to the parser
Expand Down Expand Up @@ -101,7 +101,7 @@ yeccpars1([Token | Tokens], Tokenizer, State, States, Vstack) ->
yeccpars1([], {F, A}, State, States, Vstack) ->
case apply(F, A) of
{ok, Tokens, _Endline} ->
yeccpars1(Tokens, {F, A}, State, States, Vstack);
yeccpars1(Tokens, {F, A}, State, States, Vstack);
{eof, _Endline} ->
yeccpars1([], false, State, States, Vstack);
{error, Descriptor, _Endline} ->
Expand All @@ -123,7 +123,7 @@ yeccpars1(State1, State, States, Vstack, Stack1, [Token | Tokens],
yeccpars1(State1, State, States, Vstack, Stack1, [], {F, A}) ->
case apply(F, A) of
{ok, Tokens, _Endline} ->
yeccpars1(State1, State, States, Vstack, Stack1, Tokens, {F, A});
yeccpars1(State1, State, States, Vstack, Stack1, Tokens, {F, A});
{eof, _Endline} ->
yeccpars1(State1, State, States, Vstack, Stack1, [], false);
{error, Descriptor, _Endline} ->
Expand Down

0 comments on commit 08e2d74

Please sign in to comment.