%% TRACECASE1_ON.TRC
%% -----------------------------------------------------------------------------
%% This is a test trace case to be used by the inviso_tool_SUITE.
%% Trace case setting a local pattern on math:module_info/1 and process flags
%% on a test process which is supposed to be started by the test environment.
%%
%% ProcessName=atom(), variable set in the test environment.
%% Nodes=list(), inviso_tool variable - all traced nodes.
%% -----------------------------------------------------------------------------

inviso:tpl(Nodes,math,module_info,1,[]).
inviso:tf(Nodes,ProcessName,[call]).
lists:foreach(fun(N)->rpc:call(N,ets,update_counter,[test_proc_tab,counter,1]) end,
	      Nodes).
timer:sleep(500).
%% END-OF-TRACE-CASE