aboutsummaryrefslogtreecommitdiffstats
path: root/lib/parsetools/src/leex.erl
diff options
context:
space:
mode:
authorTuncer Ayaz <[email protected]>2011-08-19 15:14:54 +0200
committerTuncer Ayaz <[email protected]>2011-09-08 14:02:17 +0200
commitebb7283730e7ee09a8d7eececd69b4fe2f5438d5 (patch)
treecd565d8fc3e637e0db442b56e433d7870ac53228 /lib/parsetools/src/leex.erl
parent899dbcf1cae11318ee1617eca4b61311e83f5ec5 (diff)
downloadotp-ebb7283730e7ee09a8d7eececd69b4fe2f5438d5.tar.gz
otp-ebb7283730e7ee09a8d7eececd69b4fe2f5438d5.tar.bz2
otp-ebb7283730e7ee09a8d7eececd69b4fe2f5438d5.zip
leex: use more descriptive name: 'werror'
Diffstat (limited to 'lib/parsetools/src/leex.erl')
-rw-r--r--lib/parsetools/src/leex.erl20
1 files changed, 10 insertions, 10 deletions
diff --git a/lib/parsetools/src/leex.erl b/lib/parsetools/src/leex.erl
index ca010e09f0..3e226229f8 100644
--- a/lib/parsetools/src/leex.erl
+++ b/lib/parsetools/src/leex.erl
@@ -78,10 +78,10 @@ compile(Input0, Output0,
Input = assure_extension(shorten_filename(Input0), ".xrl"),
Output = assure_extension(shorten_filename(Output0), ".erl"),
Includefile = lists:sublist(Includes, 1),
- Werr = proplists:get_bool(warnings_as_errors, Specific),
+ Werror = proplists:get_bool(warnings_as_errors, Specific),
Opts = [{scannerfile,Output},{includefile,Includefile},{verbose,Verbose},
{report_errors,true},{report_warnings,WarnLevel > 0},
- {warnings_as_errors, Werr}],
+ {warnings_as_errors, Werror}],
case file(Input, Opts) of
{ok, _} ->
ok;
@@ -110,7 +110,7 @@ file(File, Opts0) ->
St = try
{ok,REAs,Actions,Code,St2} = parse_file(St1),
{DFA,DF} = make_dfa(REAs, St2),
- case werr(St2) of
+ case werror(St2) of
false ->
St3 = out_file(St2, DFA, DF, Actions, Code),
case lists:member(dfa_graph, St3#leex.opts) of
@@ -262,9 +262,9 @@ leex_ret(St) ->
report_warnings(St),
Es = pack_errors(St#leex.errors),
Ws = pack_warnings(St#leex.warnings),
- Werr = werr(St),
+ Werror = werror(St),
if
- Werr ->
+ Werror ->
do_error_return(St, Es, Ws);
Es =:= [] ->
case member(return_warnings, St#leex.opts) of
@@ -281,7 +281,7 @@ do_error_return(St, Es, Ws) ->
false -> error
end.
-werr(St) ->
+werror(St) ->
member(warnings_as_errors, St#leex.opts)
andalso length(St#leex.warnings) > 0.
@@ -307,13 +307,13 @@ report_errors(St) ->
end, report_errors, St#leex.opts).
report_warnings(St) ->
- Werr = member(warnings_as_errors, St#leex.opts),
- Prefix = case Werr of
+ Werror = member(warnings_as_errors, St#leex.opts),
+ Prefix = case Werror of
true -> "";
false -> "Warning: "
end,
- ReportWerr = Werr andalso member(report_errors, St#leex.opts),
- ShouldReport = member(report_warnings, St#leex.opts) orelse ReportWerr,
+ ReportWerror = Werror andalso member(report_errors, St#leex.opts),
+ ShouldReport = member(report_warnings, St#leex.opts) orelse ReportWerror,
when_bool(fun () ->
foreach(fun({File,{none,Mod,W}}) ->
io:fwrite("~s: ~s~s\n",