anchor.diff:  
       %% Extra spaces and missing spaces
       io:format("test: parse/2 request - 4.1~n"),
  -    {request, "INVITE" , _, Header4, <<>>} = parse(Message4, none),
  +    #request{method = "INVITE",
  +	     header = Header4,
  +	     body   = <<>>
  +	    } = parse(Message4, none),
   
       %% verify the Via's
       io:format("test: parse/2 request - 4.2~n"),
  
positive.code: 
  %%--------------------------------------------------------------------
  %% Function: parse_packet(Packet, Origin) ->
  %%           parse_packet(Packet)
  %%           Packet = binary()
  %%           Origin = siporigin record() | none
  %% Descrip.: Parse a request/response. Extract the first line
  
negative.code: 
      %% basic parse
      io:format("test: parse/2 request - 1.1~n"),
      #request{method = "INVITE",
  	     uri    = URL1,
  	     header = Header1,
  	     body   = <<"body">>} = parse(Message1, none),
  
      %% verify single Via
      io:format("test: parse/2 request - 1.2~n"),
  