anchor.diff:  stream_with_joined_cdata_test() ->
       CallbackPid = spawn_link(fun() -> receiver([]) end),
       Stream0 = new(CallbackPid),
  -    Data = ["<root>", "<a>", "1", "2", "3", "</a>", "</root>"],
  +    Data = [<<"<root>">>, <<"<a>">>, <<"1">>, <<"2">>, <<"3">>,
  +            <<"</a>">>, <<"</root>">>],
       StreamN = lists:foldl(
   		fun(Chunk, Stream) ->
   			xml_stream:parse(Stream, Chunk)
  
positive.code: 	 "<x:y/>", "<x y:a='1'/>"],
      lists:foreach(
        fun(S) ->
  	      ?assertMatch({error, _}, xml_stream:parse_element(S))
        end, L).
  
  dead_pid_test() ->
  
negative.code: splitted_stream_test() ->
      CallbackPid = spawn_link(fun() -> receiver([]) end),
      Stream0 = new(CallbackPid),
      Stream1 = xml_stream:parse(Stream0, <<"<root">>),
      ?assertEqual([], collect_events(CallbackPid)),
      Stream2 = xml_stream:parse(Stream1, <<"><a>">>),
      ?assertEqual([{xmlstreamstart, <<"root">>, []}],
  		 collect_events(CallbackPid)),
      Stream3 = xml_stream:parse(Stream2, <<"</a><b/><c attr=">>),
      ?assertEqual([{xmlstreamelement, #xmlel{name = <<"a">>}},
  		  {xmlstreamelement, #xmlel{name = <<"b">>}}],
  		 collect_events(CallbackPid)),
      Stream4 = xml_stream:parse(Stream3, <<"'1'></c>">>),
      ?assertEqual([{xmlstreamelement, #xmlel{name = <<"c">>,
  					    attrs = [{<<"attr">>, <<"1">>}]}}],
  		 collect_events(CallbackPid)),
      Stream5 = xml_stream:parse(Stream4, <<"">>),
      ?assertEqual([], collect_events(CallbackPid)),
      Stream6 = xml_stream:parse(Stream5, <<"</root>">>),
      ?assertEqual([{xmlstreamend, <<"root">>}], collect_events(CallbackPid)),
      close(Stream6).
  
  too_big_test() ->
      CallbackPid = spawn_link(fun() -> receiver([]) end),
      Stream0 = new(CallbackPid, 5),
      Stream1 = xml_stream:parse(Stream0, <<"<a>">>),
      Stream2 = xml_stream:parse(Stream1, <<"<b/>">>),
      Stream3 = xml_stream:parse(Stream2, <<"<c/>">>),
      Stream4 = xml_stream:parse(Stream3, <<"<de/>">>),
      ?assertEqual([{xmlstreamstart, <<"a">>, []},
  		  {xmlstreamelement, #xmlel{name = <<"b">>}},
  		  {xmlstreamelement, #xmlel{name = <<"c">>}},
  