anchor.diff:          <<_:O/binary, "?>", _/binary>> ->
               ?ADV_COL(S, 2);
           <<_:O/binary, ">", _/binary>> ->
  -			?ADV_COL(S, 1);
  +                        ?ADV_COL(S, 1);
           <<_:O/binary, "/>", _/binary>> ->
  -			?ADV_COL(S, 2);
  +                        ?ADV_COL(S, 2);
           %% tokenize_attributes takes care of this state:
           %% <<_:O/binary, C, _/binary>> ->
           %%     find_qgt(Bin, ?INC_CHAR(S, C));
  
positive.code: parse_unescaped_lt_test() ->
      D1 = <<"<div> < < <a href=\"/\">Back</a></div>">>,
      ?assertEqual(
          {<<"div">>, [], [<<" < < ">>, {<<"a">>, [{<<"href">>, <<"/">>}], 
                                         [<<"Back">>]}]},
          mochiweb_html:parse(D1)),
  
      D2 = <<"<div> << <a href=\"/\">Back</a></div>">>,
      ?assertEqual(
          {<<"div">>, [], [<<" << ">>, {<<"a">>, [{<<"href">>, <<"/">>}], 
                                        [<<"Back">>]}]},
      mochiweb_html:parse(D2)).
  
  
negative.code:         {<<"html">>,[],[
              { <<"a">>, [ { <<"href">>, <<"#">> }, {<<"onclick">>, <<"javascript: test(1,\ntrue);">>} ], [] }
          ]},
          mochiweb_html:parse(D3)),
      ok.
  
  parse_missing_attr_name_test() ->
  