anchor.diff:      io:format("test: parse/1 - 9~n"),
       ParsedUrl9 = parse("sip:%3Alice:%3A@[1:1:1:1:2:2:2:2];transp%3b%3Bort=TCP"),
   
  -    %% Parse url with quoted comma-separated lists as parameters
  -    ParsedUrl10 = #sipurl{proto = "sip",
  -			 user = "alice", pass = none,
  -			 host = "example.org", port = none,
  -			 param = ["foo=\"bar, baZ\""],
  -			 param_pairs = url_param:to_norm(["foo=\"bar, baZ\""])
  -			},
  -    io:format("test: parse/1 - 9~n"),
  -    ParsedUrl10 = parse("sip:alice@example.org;foo=\"bar, baZ\""),
  -
       %% print(URL)
       %%--------------------------------------------------------------------
       %% test host
  
positive.code:     LB = url_param:to_list(B#sipurl.param_pairs),
  
      %% set vs ordset:
      %% ordsets is and retruns a sorted list, sets does _NOT_.
      %% ordsets should be better for for union, subtract and
      %% intersection functions and as we do few insertions (only
      %% lists:usort/1 is run on the input to ordsets:from_list/1) there
      %% should be litle need for sets.
  
negative.code:     %% check that "name=val;;name=val" doesn't work
      io:format("test: is_parameters/1 - 8~n"),
      false = is_parameters("bar=Zo%3Dp%3dg;vaF=ghjT;;;BOF=tOp"),
      %% check that quoted parameters DON'T work, sipurl BNF does not allow quoted URI parameters
      io:format("test: is_parameters/1 - 9~n"),
      false = is_parameters("foo=\"bar\""),
  
      %% test new
      %%--------------------------------------------------------------------
  