anchor.diff:      case catch apply(Function, Arguments) of
   	{'EXIT', E} ->
   	    logger:log(error, "=ERROR REPORT==== from ~p :~n~p", [Function, E]),
  -	    true;
  +	    error;
  +	{siperror, Status, Reason} ->
  +	    logger:log(error, "Spawned function ~p generated a SIP-error (ignoring) : ~p ~s",
  +			[Function, Status, Reason]),
  +	    error;
  +	{siperror, Status, Reason, _} ->
  +	    logger:log(error, "Spawned function ~p generated a SIP-error (ignoring) : ~p ~s",
  +			[Function, Status, Reason]),
  +	    error;
   	_ ->
   	    true
       end.
  
positive.code:     case catch apply(Module, Function, Arguments) of
  	{'EXIT', E} ->
  	    logger:log(error, "=ERROR REPORT==== from ~p:~p :~n~p", [Module, Function, E]),
  	    true;
  	_ ->
  	    true
      end.
  
  internal_error(Header, Socket) ->
      siprequest:send_result(Header, Socket, "", 500, "Server Internal Error").
  
  internal_error(Header, Socket, Code, Text) ->
      siprequest:send_result(Header, Socket, "", Code, Text).
  
  internal_error(Header, Socket, Code, Text, ExtraHeaders) ->
      siprequest:send_result(Header, Socket, "", Code, Text, ExtraHeaders).
  
  process(Packet, Socket, Origin, RequestFun, ResponseFun) ->
      {_, IP, _, _} = Origin,
      case parse_packet(Socket, Packet, Origin) of
  
negative.code:     {_, ToURI} = sipheader:to(keylist:fetch("To", Header)),
      sanity_check_uri("To:", ToURI, Header).
  
  check_for_loop(Header, URI, Method) ->
      LoopCookie = siprequest:get_loop_cookie(Header, URI),
      ViaHostname = siprequest:myhostname(),
      ViaPort = siprequest:default_port(sipserver:get_env(listenport, none)),
      case via_indicates_loop(LoopCookie, {ViaHostname, ViaPort},
      			    sipheader:via(keylist:fetch("Via", Header))) of
  	true ->
  	    case Method of
  		"ACK" ->
  		    logger:log(debug, "Loop detected for ACK ~s, dropping packet", [sipurl:print(URI)]),
  		    throw({error, drop});
  		_ ->
  		    throw({sipparseerror, Header, 482, "Loop Detected"})
  	    end;
  	_ ->
  	    true
      end.
  