diff options
author | Tihon <[email protected]> | 2016-07-29 13:31:25 +0300 |
---|---|---|
committer | Tihon <[email protected]> | 2016-07-29 13:31:25 +0300 |
commit | fdbf5631d9de0d1b7d763c25e634e768cae4bcc0 (patch) | |
tree | b2f7b56a2341011fcf1d9c6bcd78f3d9d5987f6f | |
parent | 18d328f9e2275d13a1d469016916f7261a612951 (diff) | |
download | otp-fdbf5631d9de0d1b7d763c25e634e768cae4bcc0.tar.gz otp-fdbf5631d9de0d1b7d763c25e634e768cae4bcc0.tar.bz2 otp-fdbf5631d9de0d1b7d763c25e634e768cae4bcc0.zip |
fix gc_start\end bug
-rw-r--r-- | lib/tools/src/fprof.erl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/tools/src/fprof.erl b/lib/tools/src/fprof.erl index 8db23dd151..1291a3e5ec 100644 --- a/lib/tools/src/fprof.erl +++ b/lib/tools/src/fprof.erl @@ -1636,6 +1636,11 @@ trace_handler({trace_ts, Pid, gc_major_start, _Func, TS} = Trace, Table, _, Dump dump_stack(Dump, get(Pid), Trace), trace_gc_start(Table, Pid, TS), TS; + +trace_handler({trace_ts, Pid, gc_start, _Func, TS} = Trace, Table, _, Dump) -> + dump_stack(Dump, get(Pid), Trace), + trace_gc_start(Table, Pid, TS), + TS; %% %% gc_end @@ -1648,6 +1653,12 @@ trace_handler({trace_ts, Pid, gc_major_end, _Func, TS} = Trace, Table, _, Dump) dump_stack(Dump, get(Pid), Trace), trace_gc_end(Table, Pid, TS), TS; + +trace_handler({trace_ts, Pid, gc_end, _Func, TS} = Trace, Table, _, Dump) -> + dump_stack(Dump, get(Pid), Trace), + trace_gc_end(Table, Pid, TS), + TS; + %% %% link trace_handler({trace_ts, Pid, link, _OtherPid, TS} = Trace, |