diff options
| author | Fredrik Gustafsson <[email protected]> | 2013-04-10 17:55:25 +0200 |
|---|---|---|
| committer | Fredrik Gustafsson <[email protected]> | 2013-04-10 17:55:25 +0200 |
| commit | c55f2caf26cdb9709f06412de0feece4e95e5574 (patch) | |
| tree | c246c1779ca33b991665d4654e795957f796634a /lib/dialyzer/src/dialyzer_analysis_callgraph.erl | |
| parent | 92727b2d911362c1efc8df84cf685c91f154e15a (diff) | |
| parent | 071bffb32b861a6cf3f2d715d7c92eeda4dfcb16 (diff) | |
| download | otp-c55f2caf26cdb9709f06412de0feece4e95e5574.tar.gz otp-c55f2caf26cdb9709f06412de0feece4e95e5574.tar.bz2 otp-c55f2caf26cdb9709f06412de0feece4e95e5574.zip | |
Merge branch 'sa/dialyzer-bitstring-fixes/OTP-11027' into maint
* sa/dialyzer-bitstring-fixes/OTP-11027:
Minor refactorings
Fix minor error in natively compiled module list
Fix notification for duplicate modules
Fix an error in the type inference of bitstring data
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", |