anchor.diff:  	SQS_Res6 -> throw({error, test_case_failed, SQS_Res6})
       end,
   
  +
  +    %% split_non_quoted(Delim, In)
  +    %%--------------------------------------------------------------------
  +    autotest:mark(?LINE, "split_non_quoted/2 - 1"),
  +    %% regular test case
  +    {ok, ["foo", "bar"]} = split_non_quoted($;, "foo;bar"),
  +
  +    autotest:mark(?LINE, "split_non_quoted/2 - 2"),
  +    %% with quotes and empty elements, this function does not strip spaces
  +    {ok, ["foo\";\" ", "bar"]} = split_non_quoted($;, ";foo\";\" ;;bar;;;"),
  +
  +    autotest:mark(?LINE, "split_non_quoted/2 - 3"),
  +    %% with quotes and empty elements
  +    {ok, ["foo \"this is quoted ;\\\" baz \\ quote end here\" ", "bar"]} =
  +	split_non_quoted($;, ";foo \"this is quoted ;\\\" baz \\ quote end here\" ;;;bar;"),
  +
  +    autotest:mark(?LINE, "split_non_quoted/2 - 4"),
  +    %% unbalanced quotes
  +    {error, unbalanced_quotes} = split_non_quoted($;, ";foo=\"bar"),
   
       %% parse_hostport/1
       %%--------------------------------------------------------------------
  
positive.code: -export([
  	 split_fields/2,
  	 split_quoted_string/1,
  	 parse_host/1,
  	 parse_hostport/1,
  	 is_alpha/1,
  
negative.code: %% This module implements some of the parsing rules needed for
  %% the BNF defined in RFC 3261 (chapter 25 page 218)
  %%
  %% Note: The functions in this module are assumed to conform STRICTLY
  