anchor.diff:  			    E = {failed,{Mod,end_per_testcase,Why}},
   			    {Result,E}
   		    end,
  -		FailLoc = proplists:get_value(tc_fail_loc, EndConf),
  +		FailLoc = proplists:get_value(tc_fail_loc, EndConf1),
   		case catch do_end_tc_call(Mod,Func, FailLoc,
  -					  {Pid,Report,[EndConf]}, Why) of
  +					  {Pid,Report,[EndConf1]}, Why) of
   		    {'EXIT',FwEndTCErr} ->
   			exit({fw_notify_done,end_tc,FwEndTCErr});
   		    _ ->
  
positive.code: 	{read_comment,From} ->
  	    From ! {self(),read_comment,Comment},
  	    run_test_case_msgloop(Ref,Pid,CaptureStdout,Terminate,Comment,CurrConf);
  	{set_curr_conf,NewCurrConf} ->
  	    run_test_case_msgloop(Ref,Pid,CaptureStdout,Terminate,Comment,NewCurrConf);
  	{'EXIT',Pid,{Ref,Time,Value,Loc,Opts}} ->
  	    RetVal = {Time/1000000,Value,mod_loc(Loc),Opts,Comment},
  
negative.code: 		    %% call user callback function if defined
  		    NewConf1 = user_callback(TCCallback, Mod, Func, init, NewConf),
  		    %% save current state in controller loop
  		    sync_send(group_leader(),set_curr_conf,{{Mod,Func},NewConf1},
  			      5000, fun() -> exit(no_answer_from_group_leader) end),
  		    put(test_server_loc, {Mod,Func}),
  		    %% execute the test case
  		    {{T,Return},Loc} = {ts_tc(Mod, Func, [NewConf1]),get_loc()},
  