anchor.diff:  %%                /  %xFC-FD 5UTF8-CONT
   %% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   -module(contact).
  -
  +%%-compile(export_all).
   
   %%--------------------------------------------------------------------
   %% External exports
  
positive.code:     NameValList = [parse_param(Param) || Param <- Params],
      contact_param:to_norm(NameValList).
  
  %% return: {NameStr,ValueStr} | throw()
  parse_param(ParamStr) ->
      {Name, Value} = sipparse_util:split_fields(ParamStr, $=),
      NameStripped = strip(Name, both, [?CR,?LF,?SP,?HTAB]),
      ValueStripped = strip(Value, both, [?CR,?LF,?SP,?HTAB]),
  
      ParamName = httpd_util:to_lower(NameStripped),
  
  
negative.code: 		   contact_param = contact_param:to_norm([])
  		  }],
      P2 = parse(["<sip:alice@pc33.atlanta.com>"]),
  
      %% test name_addr with display-name
      io:format("test: parse/1 - 5~n"),
      P5 = [#contact{display_name = "Mr. Watson",
  