anchor.diff:  
       ?line erlang:trace_pattern({?MODULE,loaded,1}, true, [call_time]),
   
  -    ?line Pids    = [setup() || _ <- lists:seq(1, F*Np)],
  +    ?line Pids     = [setup() || _ <- lists:seq(1, F*Np)],
       ?line {_Ls,T1} = execute(Pids, {?MODULE,loaded,[M]}),
       ?line [Pid ! quit || Pid <- Pids],
   
  
positive.code: 	 pause_and_restart/1, scheduling/1, called_function/1, combo/1, bif/1, nif/1]).
  
  init_per_testcase(_Case, Config) ->
      ?line Dog=test_server:timetrap(test_server:seconds(120)),
      erlang:trace_pattern({'_','_','_'}, false, [local,meta,call_time,call_count]),
      erlang:trace_pattern(on_load, false, [local,meta,call_time,call_count]),
      timer:now_diff(now(),now()),
  
negative.code:     ?line {call_time, CT} = erlang:trace_info({?MODULE,loaded,1}, call_time),
  
      ?line lists:foreach(fun (Pid) ->
  	    ?line ok = case check_process_time(lists:keysearch(Pid, 1, CT), M, F, T1) of
  		schedule_time_error ->
  		    test_server:comment("Warning: Failed time ratio"),
  		    ok;
  		Other -> Other
  	    end
  	end, Pids),
      ?line P  = erlang:trace_pattern({'_','_','_'}, false, [call_time]),
      ok.
  