anchor.diff:          {<<"html">>,[],[
               { <<"a">>, [ { <<"href">>, <<"#">> }, {<<"onclick">>, <<"javascript: test(1,\ntrue);">>} ], [] }
           ]},
  -        mochiweb_html:parse(D3)),     
  +        mochiweb_html:parse(D3)),
       ok.
   
   parse_missing_attr_name_test() ->
  
positive.code:     to_tokens({Tag0, [], Acc});
  to_tokens({Tag0, Attrs, Acc}) ->
      Tag = to_tag(Tag0),
      case is_singleton(Tag) of 
          true ->
              to_tokens([], [{start_tag, Tag, Attrs, true}]);
          false ->
  
negative.code:     ok.
  
  parse_broken_pi_test() ->
          D0 = <<"<html><?xml:namespace prefix = o ns = \"urn:schemas-microsoft-com:office:office\" /></html>">>,
          ?assertEqual(
                  {<<"html">>, [], [
                          { pi, <<"xml:namespace">>, [ { <<"prefix">>, <<"o">> },
                                                       { <<"ns">>, <<"urn:schemas-microsoft-com:office:office">> } ] }
                  ] },
                  mochiweb_html:parse(D0)),
          ok.
  
  parse_funny_singletons_test() ->
          D0 = <<"<html><input><input>x</input></input></html>">>,
          ?assertEqual(
                  {<<"html">>, [], [
                          { <<"input">>, [], [] },
                          { <<"input">>, [], [ <<"x">> ] }
                  ] },
                  mochiweb_html:parse(D0)),
          ok.
  
  to_html_singleton_test() ->
      D0 = <<"<link />">>,
  