@@ -1176,11 +1176,15 @@ trace_info_killed(_Config) ->
11761176 ok .
11771177
11781178tik_tester (MySched ) ->
1179- tik_tester_run (MySched , call_time ),
1180- tik_tester_run (MySched , call_memory ),
1179+ [begin
1180+ io :format (" N = ~p \n " , [N ]),
1181+ tik_tester_run (MySched , call_time , N ),
1182+ tik_tester_run (MySched , call_memory , N )
1183+ end
1184+ || N <- lists :seq (0 ,4 )],
11811185 ok .
11821186
1183- tik_tester_run (MySched , TraceType ) ->
1187+ tik_tester_run (MySched , TraceType , Spin ) ->
11841188 NScheds = erlang :system_info (schedulers_online ),
11851189 OtherSched = (MySched rem NScheds ) + 1 ,
11861190
@@ -1212,6 +1216,7 @@ tik_tester_run(MySched, TraceType) ->
12121216 Victim ! go ,
12131217 {trace , Victim , call , {? MODULE , tik_foo , []}} = receive_any (),
12141218 {trace , Victim , call , {_ , trace_info , _ }} = receive_any (),
1219+ [erlang :yield () || _ <- lists :seq (1 ,Spin )],
12151220 erlang :exit (Victim , abort ),
12161221 {'DOWN' , MRef , process , Victim , abort } = receive_any (),
12171222
0 commit comments