diff options
author | Fredrik Gustafsson <[email protected]> | 2013-04-10 17:55:32 +0200 |
---|---|---|
committer | Fredrik Gustafsson <[email protected]> | 2013-04-10 17:55:32 +0200 |
commit | f9b6fc053d162a219973be1323676bfe0f8dd292 (patch) | |
tree | d2bd4d6dfdca3e374a77b9a1086baa325324437c /lib/dialyzer/src/dialyzer_analysis_callgraph.erl | |
parent | a5a2dc0c67defb34fb7c363a07ec4064b28148c9 (diff) | |
parent | c55f2caf26cdb9709f06412de0feece4e95e5574 (diff) | |
download | otp-f9b6fc053d162a219973be1323676bfe0f8dd292.tar.gz otp-f9b6fc053d162a219973be1323676bfe0f8dd292.tar.bz2 otp-f9b6fc053d162a219973be1323676bfe0f8dd292.zip |
Merge branch 'maint'
Diffstat (limited to 'lib/dialyzer/src/dialyzer_analysis_callgraph.erl')
-rw-r--r-- | lib/dialyzer/src/dialyzer_analysis_callgraph.erl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl index ca6b403ac9..affb89385e 100644 --- a/lib/dialyzer/src/dialyzer_analysis_callgraph.erl +++ b/lib/dialyzer/src/dialyzer_analysis_callgraph.erl @@ -255,10 +255,13 @@ compile_and_store(Files, #analysis_state{codeserver = CServer, CServer2 = dialyzer_codeserver:set_next_core_label(NextLabel, CServer), case Failed =:= [] of true -> - NewFiles = lists:zip(lists:reverse(Modules), Files), ModDict = - lists:foldl(fun({Mod, F}, Dict) -> dict:append(Mod, F, Dict) end, - dict:new(), NewFiles), + lists:foldl(fun(F, Dict) -> + ModFile = lists:last(filename:split(F)), + Mod = filename:basename(ModFile, ".beam"), + dict:append(Mod, F, Dict) + end, + dict:new(), Files), check_for_duplicate_modules(ModDict); false -> Msg = io_lib:format("Could not scan the following file(s):~n~s", |