anchor.diff:  
   destack(TagName, Stack) when is_list(Stack) ->
       F = fun (X) ->
  -                case X of 
  +                case X of
                       {TagName, _, _} ->
                           false;
                       _ ->
  
positive.code:         <<_:Start/binary, Raw/binary>> ->
              {{comment, Raw}, S}
      end.
  
negative.code:             {S2, _} = find_gt(B, S1),
              {{end_tag, Tag}, S2};
          <<_:O/binary, "<", C, _/binary>> when ?IS_WHITESPACE(C) ->
              %% This isn't really strict HTML
              tokenize_data(B, ?INC_COL(S));
          <<_:O/binary, "<", _/binary>> ->
              {Tag, S1} = tokenize_literal(B, ?INC_COL(S)),
  