anchor.diff:  		ignore ->
   		    ok
   	    end,
  -	    run_test_case_msgloop(Ref,Pid,
  -				  Terminate,Comment,CurrConf,Status);
  +	    run_test_case_msgloop(St0);
   	{user_timetrap,Pid,TrapTime,StartTime,ElapsedTime,Scale} ->
   	    %% a user timetrap is triggered, ignore it if new
   	    %% timetrap has been started since
  
positive.code:     end,
      get_loc().
  
  %% find the latest known Suite:Testcase
  get_mf(MFs) ->
      get_mf(MFs, {undefined,undefined}).
  
  get_mf([MF|MFs], _Found) when is_tuple(MF) ->
      ModFunc = {Mod,_} = case MF of
  			    {M,F,_} -> {M,F};
  			    MF -> MF
  			end,
      case is_suite(Mod) of
  	true -> ModFunc;
  	false -> get_mf(MFs, ModFunc)
      end;
  get_mf(_, Found) ->
      Found.
  
  is_suite(Mod) ->
      case lists:reverse(atom_to_list(Mod)) of
  	"ETIUS" ++ _ -> true;
  
negative.code: 		    %% call user callback function if defined
  		    NewConf1 = user_callback(TCCallback, Mod, Func, init, NewConf),
  		    %% save current state in controller loop
  		    tc_supervisor_req(set_curr_conf, NewConf1),
  		    put(test_server_loc, {Mod,Func}),
  		    %% execute the test case
  		    {{T,Return},Loc} = {ts_tc(Mod, Func, [NewConf1]),get_loc()},
  