anchor.diff:  -define(IS_LITERAL_SAFE(C),
           ((C >= $A andalso C =< $Z) orelse (C >= $a andalso C =< $z)
            orelse (C >= $0 andalso C =< $9))).
  -                                
  +
   -record(decoder, {line=1,
                     column=1,
                     offset=0}).
  
positive.code:         tokens(<<"<foo bar=baz wibble='wibble' alice=bob/>">>),
      [{comment, <<"[if lt IE 7]>\n<style type=\"text/css\">\n.no_ie { display: none; }\n</style>\n<![endif]">>}] =
          tokens(<<"<!--[if lt IE 7]>\n<style type=\"text/css\">\n.no_ie { display: none; }\n</style>\n<![endif]-->">>),
      ok.
  
  tokens(B, S=#decoder{offset=O}, Acc) ->
  
negative.code: 
  destack(TagName, Stack) when is_list(Stack) ->
      F = fun (X) ->
                  case X of
                      {TagName, _, _} ->
                          false;
                      _ ->
  