anchor.diff:  looper(Fun, State) ->
       looper(Fun, Fun(State)).
   
  -spawn_logger(Procs, FailedMemchecks) ->
  +spawn_logger(Procs) ->
       receive
   	{new_test_proc, Proc} ->
  -	    spawn_logger([Proc|Procs], FailedMemchecks);
  +	    spawn_logger([Proc|Procs]);
   	{sync_test_procs, Kill, From} ->
   	    lists:foreach(fun (Proc) when From == Proc ->
   				  ok;
  
positive.code:     io:format("*** SEED: ~p ***\n", [rand:export_seed()]),
      start_spawn_logger(),
      wait_for_test_procs(), %% Ensure previous case cleaned up
      put('__ETS_TEST_CASE__', Case),
      [{test_case, Case} | Config].
  
  end_per_testcase(_Func, _Config) ->
  
negative.code: 				  end
  			  end, Procs),
  	    From ! test_procs_synced,
  	    spawn_logger([From])
      end.
  
  pid_status(Pid) ->
  