aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLuca Favatella <[email protected]>2015-09-22 01:38:39 +0100
committerHans Bolinder <[email protected]>2016-01-26 09:11:46 +0100
commitd4d083d9e9c6d48519404eda51761fce01f8f0e3 (patch)
treea6c52423a2f5a4a72aab46c18d31d3ea9e3e430e
parentbf799ffa828a82c6abd85f1569195890bd887ad1 (diff)
downloadotp-d4d083d9e9c6d48519404eda51761fce01f8f0e3.tar.gz
otp-d4d083d9e9c6d48519404eda51761fce01f8f0e3.tar.bz2
otp-d4d083d9e9c6d48519404eda51761fce01f8f0e3.zip
Refactor dialyzer_analysis_callgraph
-rw-r--r--lib/dialyzer/src/dialyzer_analysis_callgraph.erl14
1 files changed, 5 insertions, 9 deletions
diff --git a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
index 826ac51775..b063005b4a 100644
--- a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
+++ b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl
@@ -93,11 +93,7 @@ loop(#server_state{parent = Parent} = State,
send_log(Parent, LogMsg),
loop(State, Analysis, ExtCalls);
{AnalPid, warnings, Warnings} ->
- case Warnings of
- [] -> ok;
- SendWarnings ->
- send_warnings(Parent, SendWarnings)
- end,
+ send_warnings(Parent, Warnings),
loop(State, Analysis, ExtCalls);
{AnalPid, cserver, CServer, Plt} ->
send_codeserver_plt(Parent, CServer, Plt),
@@ -105,11 +101,11 @@ loop(#server_state{parent = Parent} = State,
{AnalPid, done, Plt, DocPlt} ->
case ExtCalls =:= none of
true ->
- send_analysis_done(Parent, Plt, DocPlt);
+ ok;
false ->
- send_ext_calls(Parent, ExtCalls),
- send_analysis_done(Parent, Plt, DocPlt)
- end;
+ send_ext_calls(Parent, ExtCalls)
+ end,
+ send_analysis_done(Parent, Plt, DocPlt);
{AnalPid, ext_calls, NewExtCalls} ->
loop(State, Analysis, NewExtCalls);
{AnalPid, ext_types, ExtTypes} ->