anchor.diff:  tokenize_literal([C | Rest], S, Acc) ->
       tokenize_literal(Rest, ?INC_COL(S), [C | Acc]).
   
  +tokenize_cdata([], S, Acc) ->
  +    {{data, lists:reverse(Acc), false}, [], S};
  +tokenize_cdata("]]>" ++ Rest, S, Acc) ->
  +    {{data, lists:reverse(Acc), false}, Rest, ?ADV_COL(S, 3)};
  +tokenize_cdata([C | Rest], S, Acc) ->
  +    tokenize_cdata(Rest, ?INC_CHAR(S, C), [C | Acc]).
  +
   tokenize_comment([], S, Acc) ->
       {{comment, lists:reverse(Acc)}, [], S};
   tokenize_comment("-->" ++ Rest, S, Acc) ->
  
positive.code:     tokenize_comment(Rest, ?ADV_COL(S, 4), []);
  tokenize("<!DOCTYPE " ++ Rest, S) ->
      tokenize_doctype(Rest, ?ADV_COL(S, 10), []);
  tokenize("&" ++ Rest, S) ->
      tokenize_charref(Rest, ?INC_COL(S), []);
  tokenize("</" ++ Rest, S) ->
  
negative.code:    <link rel=\"icon\" href=\"/static/images/favicon.ico\" type=\"image/x-icon\">
     <link rel=\"shortcut icon\" href=\"/static/images/favicon.ico\" type=\"image/x-icon\">
   </head>
   <body id=\"home\" class=\"tundra\"><![CDATA[&lt;<this<!-- is -->CDATA>&gt;]]></body>
  </html>",
      Expect = {"html", [],
                [{"head", [],
  