anchor.diff:  %%           Header     = keylist record()
   %%           BodyOffset = integer()
   %%--------------------------------------------------------------------
  -parse_packet(Packet) ->
  -    parse_packet(Packet, none).
  -
   parse_packet(<<?CR, ?LF>>, Origin) ->
       if
   	is_record(Origin, siporigin) ->
  
positive.code: %%--------------------------------------------------------------------
  -export([
  	 parse/2,
  	 parse_packet/1,
  	 parse_packet/2,
  
  	 test/0
  	]).
  
negative.code: 
  %%--------------------------------------------------------------------
  %% Function: parse_packet(Packet, Origin) ->
  %%           Packet = binary()
  %%           Origin = siporigin record() | none
  %% Descrip.: Parse a request/response. Extract the first line
  