anchor.diff:      %% check that we don't accept unknown Proxy-Require
       io:format("test: check_proxy_request/1 - 6~n"),
       ReqHeader3 = keylist:set("Proxy-Require", ["CantBeSupported"], ReqHeader2),
  -    Req3 = Req2#request{method="INVITE", header=ReqHeader3, body=""},
  +    Req3 = Req2#request{method="INVITE", header=ReqHeader3, body = <<>>},
       Unsupported = [{"Unsupported",["CantBeSupported"]}],
       {siperror, 420, _, Unsupported} = (catch check_proxy_request(Req3)),
   
  
positive.code: %%                         ViaParameters, SipSocket, Request)
  %%           Status    = integer(), SIP status code
  %%           Reason    = string(), SIP reason phrase
  %%           Body      = string()
  %%           ExtraHeaders = keylist record()
  %%           ViaParameters = list() of string()
  %%           SipSocket = sipsocket record() | atom(), protocol
  
negative.code: 
      %% test make_response/7
      io:format("test: make_response/7 - 2.1~n"),
      Response2 = make_response(486, "_BUSY_", <<>>, [{"Extra-Header", ["test"]}], ["test=true"],
  			      tls6, #request{header=ReqHeader}),
  
      %% basic response record check
      io:format("test: make_response/7 - 2.2~n"),
      #response{status=486, reason="_BUSY_", body = <<>>} = Response2,
  
      %% Timestamp NOT present in 486 Busy Here
      io:format("test: make_response/7 - 2.3~n"),
  