diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2010-06-07 18:44:47 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2010-06-09 14:26:05 +0200 |
| commit | 3f2c888e08636c1f090e87fd009ff2416b8a978b (patch) | |
| tree | ca0308a96ce14e08b0ae8cf73241550684718568 /lib | |
| parent | 100b825383319c9bc5ff57707348d39ad72279a9 (diff) | |
| download | otp-3f2c888e08636c1f090e87fd009ff2416b8a978b.tar.gz otp-3f2c888e08636c1f090e87fd009ff2416b8a978b.tar.bz2 otp-3f2c888e08636c1f090e87fd009ff2416b8a978b.zip | |
Switch pattern API for eprof profile with mfa
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/tools/src/eprof.erl | 8 | ||||
| -rw-r--r-- | lib/tools/test/eprof_SUITE.erl | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/lib/tools/src/eprof.erl b/lib/tools/src/eprof.erl index 2b71b16c82..6a0bd9ff9c 100644 --- a/lib/tools/src/eprof.erl +++ b/lib/tools/src/eprof.erl @@ -76,14 +76,14 @@ profile(Pids, Fun) -> profile(Pids, Fun, {'_','_','_'}). profile(Pids, Fun, Pattern) -> - profile(Pids, Pattern, erlang, apply, [Fun,[]]). + profile(Pids, erlang, apply, [Fun,[]], Pattern). profile(Pids, M, F, A) -> - profile(Pids, {'_','_','_'}, M, F, A). + profile(Pids, M, F, A, {'_','_','_'}). -profile(Pids, Pattern, M, F, A) -> +profile(Pids, M, F, A, Pattern) -> start(), - gen_server:call(?MODULE, {profile,Pids,Pattern, M,F,A},infinity). + gen_server:call(?MODULE, {profile,Pids,Pattern,M,F,A},infinity). dump() -> gen_server:call(?MODULE, dump, infinity). diff --git a/lib/tools/test/eprof_SUITE.erl b/lib/tools/test/eprof_SUITE.erl index 71e7eea56b..7e97db86b0 100644 --- a/lib/tools/test/eprof_SUITE.erl +++ b/lib/tools/test/eprof_SUITE.erl @@ -76,7 +76,7 @@ basic(Config) when is_list(Config) -> %% with mfa ?line {ok, _} = eprof:profile([], eprof_test, go, [10]), - ?line {ok, _} = eprof:profile([], {eprof_test, dec, 1}, eprof_test, go, [10]), + ?line {ok, _} = eprof:profile([], eprof_test, go, [10], {eprof_test, dec, 1}), %% dump |