diff options
author | Björn Gustavsson <[email protected]> | 2010-02-13 10:19:55 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-02-16 13:24:55 +0100 |
commit | 08e2d74ac0957a1a274be359d50d601a21d3ef0d (patch) | |
tree | 5bfdf8d31acc9564eddbffa3d092be870901cbdb /lib | |
parent | 2b451b05c7e0df3ed2873bba4baba392c55ad047 (diff) | |
download | otp-08e2d74ac0957a1a274be359d50d601a21d3ef0d.tar.gz otp-08e2d74ac0957a1a274be359d50d601a21d3ef0d.tar.bz2 otp-08e2d74ac0957a1a274be359d50d601a21d3ef0d.zip |
parsetools: Replace TABs with spaces
The files in the parsetools application are supposed to be
indented using spaces only. Remove the stray TABs that somehow
have crept in.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/parsetools/include/yeccpre.hrl | 10 | ||||
-rw-r--r-- | lib/parsetools/src/yeccparser.erl | 12 |
2 files changed, 11 insertions, 11 deletions
diff --git a/lib/parsetools/include/yeccpre.hrl b/lib/parsetools/include/yeccpre.hrl index 2ffa13d6a7..ceaf06f0f7 100644 --- a/lib/parsetools/include/yeccpre.hrl +++ b/lib/parsetools/include/yeccpre.hrl @@ -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 @@ -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} -> diff --git a/lib/parsetools/src/yeccparser.erl b/lib/parsetools/src/yeccparser.erl index 80a6bbce0e..1bd922ce5c 100644 --- a/lib/parsetools/src/yeccparser.erl +++ b/lib/parsetools/src/yeccparser.erl @@ -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 @@ -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} -> @@ -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} -> |