anchor.diff:  
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
  -tokenize_tag([[$\\, Ch | Ln] | T], text, AccL, AccR) ->
  +tokenize_tag([[$\\, Ch | Ln] | T], text, AccL, AccR)
  +    when ?IS_WHITESPACE(Ch) orelse Ch == $| ->
     tokenize_tag([Ln | T], text, [Ch | AccL], AccR);
   
   tokenize_tag([[Ch | Ln] | T], text, AccL, AccR) when ?IS_WHITESPACE(Ch) ->
  
positive.code: tokenize_tag([[Q, $| | Ln] | T], {quote, Q}, AccL, AccR) ->
    tokenize_tag([Ln | T], text, [], add_text(quote, AccL, AccR));
  
  tokenize_tag([[$\\, Q, $| | Ln] | T], {quote, Q}, AccL, AccR) ->
    tokenize_tag([Ln | T], {quote, Q}, [$|, Q | AccL], AccR);
  
  tokenize_tag([], {quote, Q}, AccL, AccR) ->
    tokenize_tag([], text, AccL ++ [Q, $|], AccR);
  
  
negative.code: parse_attr([[Close | W] | T], {attr, Id, Val}, {Open, Close, L}, Attr) ->
    parse_attr([W | T], {attr, Id, [Close | Val]}, {Open, Close, L-1}, Attr);
  
  parse_attr([[$\\, Close | W] | T], {attr, Id, Val}, {_,Close,_} = Br, Attr) ->
    parse_attr([W | T], {attr, Id, [Close | Val]}, Br, Attr);
  
  parse_attr([[Ch | W] = Word | T], {attr, Id, Val} = State, Br, Attr) ->
    case zml_indent:parse_id(Word) of
      {NewId, ":"} ->
        parse_attr(T, {attr, NewId, []}, Br, add_attr(State, Attr));
      {NewId, "\\:"} ->
        parse_attr(T, {attr, Id, [$: | append_rev(NewId, Val)]}, Br, Attr);
      {[_|_] = NewId, R} ->
        parse_attr([R | T], {attr, Id, append_rev(NewId, Val)}, Br, Attr);
      _ -> parse_attr([W | T], {attr, Id, [Ch | Val]}, Br, Attr)
    end.
  
  