anchor.diff:  %% External functions
   %%====================================================================
   
  -start() ->
  +start_link() ->
       sipsocket:start_link().
   
   %%--------------------------------------------------------------------
  
positive.code: 	    {Method, OrigURI, Header, Body} = {Request#request.method, Request#request.uri,
  					       Request#request.header, Request#request.body},
  	    NewHeader1 = siprequest:proxy_add_via(Header, OrigURI, ViaParameters, Proto),
  	    BinLine1 = list_to_binary([Method, " ", sipurl:print(Dst#sipdst.uri), " SIP/2.0"]),
  	    BinMsg = siprequest:binary_make_message(BinLine1, NewHeader1, list_to_binary(Body)),
  	    SendRes = sipsocket:send(SipSocket, Proto, IP, Port, BinMsg),
  	    case SendRes of
  		ok ->
  		    logger:log(debug, "Siprequest (transport layer) : sent request(dst=~s) :~n~s~n",
  			       [DestStr, binary_to_list(BinMsg)]),
  		    TopVia = sipheader:topvia(NewHeader1),
  		    UsedBranch = lists:flatten(sipheader:get_via_branch_full(TopVia)),
  		    {ok, SipSocket, UsedBranch};
  		{error, E} ->
  
negative.code: %% External exports
  %%--------------------------------------------------------------------
  -export([
  	 start_link/0,
  	 send_proxy_request/4,
  	 send_proxy_response/2,
  	 send_result/5,
  