|
|
|
@ -45,7 +45,7 @@ stl() -> |
|
|
|
trace([{app, eSync}, {scope, [new_processes]}], tpTracerLog). |
|
|
|
|
|
|
|
stf() -> |
|
|
|
trace([{scope, [new_processes]}], tpTracerFile). |
|
|
|
trace([{app, eSync}, {scope, [whereis(esSyncSrv)]}], tpTracerFile). |
|
|
|
|
|
|
|
pts() -> |
|
|
|
ok. |
|
|
|
@ -188,7 +188,7 @@ traceInput([{scope, Scope} | Tail], TracerState, TraceOpts) -> |
|
|
|
[ |
|
|
|
begin |
|
|
|
%erlang:trace(PidPortSpec, true, [call, procs, arity, return_to, set_on_spawn, {tracer, tpTracerNif, TracerState} | ExtraFlags]) |
|
|
|
erlang:trace(PidPortSpec, true, [call, procs, arity, send, 'receive', running, exiting, set_on_spawn, {tracer, tpTracerNif, TracerState}]) |
|
|
|
erlang:trace(PidPortSpec, true, [call, arity, send, 'receive', set_on_spawn, {tracer, tpTracerNif, TracerState}]) |
|
|
|
end || PidPortSpec <- Scope |
|
|
|
], |
|
|
|
traceInput(Tail, TracerState, TraceOpts); |
|
|
|
@ -202,6 +202,6 @@ traceInput([Mod | Tail], TracerState, TraceOpts) when is_atom(Mod) -> |
|
|
|
end, |
|
|
|
%% The module must be loaded before we attempt to trace it. |
|
|
|
_ = code:ensure_loaded(Mod), |
|
|
|
io:format("IMY****************** ~p~n", [Mod]), |
|
|
|
io:format("IMY****************** ~p~n ", [Mod]), |
|
|
|
_ = erlang:trace_pattern({Mod, '_', '_'}, MatchSpec, [local]), |
|
|
|
traceInput(Tail, TracerState, TraceOpts). |
