diff options
author | Björn-Egil Dahlberg <[email protected]> | 2010-11-24 19:43:27 +0100 |
---|---|---|
committer | Björn-Egil Dahlberg <[email protected]> | 2010-11-24 19:43:27 +0100 |
commit | 99a28d961d2d760e98353b55991f1fc51dee06b0 (patch) | |
tree | 4310dad6bf426167e147d475e9ac71bc725ca9fc /lib | |
parent | 58733c3ad0b1e60af8f44334998f95199d887ba1 (diff) | |
parent | a5da41e6addc7aa84c1aa2af151d7f13d3d657e2 (diff) | |
download | otp-99a28d961d2d760e98353b55991f1fc51dee06b0.tar.gz otp-99a28d961d2d760e98353b55991f1fc51dee06b0.tar.bz2 otp-99a28d961d2d760e98353b55991f1fc51dee06b0.zip |
Merge branch 'egil/eprof-api-mismatch/OTP-8853' into dev
* egil/eprof-api-mismatch/OTP-8853:
Fix eprof API mismatch of sort functionality
Diffstat (limited to 'lib')
-rw-r--r-- | lib/tools/src/eprof.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/tools/src/eprof.erl b/lib/tools/src/eprof.erl index f7c1b76364..8e5c0ec46b 100644 --- a/lib/tools/src/eprof.erl +++ b/lib/tools/src/eprof.erl @@ -415,15 +415,15 @@ sort_mfa(Bpfs, mfa) when is_list(Bpfs) -> end, Bpfs); sort_mfa(Bpfs, time) when is_list(Bpfs) -> lists:sort(fun - ({_,{A,_}}, {_,{B,_}}) when A < B -> true; + ({_,{_,A}}, {_,{_,B}}) when A < B -> true; (_, _) -> false end, Bpfs); sort_mfa(Bpfs, calls) when is_list(Bpfs) -> lists:sort(fun - ({_,{_,A}}, {_,{_,B}}) when A < B -> true; + ({_,{A,_}}, {_,{B,_}}) when A < B -> true; (_, _) -> false end, Bpfs); -sort_mfa(Bpfs, _) when is_list(Bpfs) -> sort_mfa(Bpfs, calls). +sort_mfa(Bpfs, _) when is_list(Bpfs) -> sort_mfa(Bpfs, time). filter_mfa(Bpfs, Ts) when is_list(Ts) -> filter_mfa(Bpfs, [], proplists:get_value(calls, Ts, 0), proplists:get_value(time, Ts, 0)); |