anchor.diff:      CharCount: Integer;
   
       Sy: TElemSymb;
  +    IsXhtmlEndSy: Boolean; // current symbol is an xhtml combined start/end tag like <tag [attr="value" ...] />
       Attributes: TAttributeList;
   
       BaseFontSize: Integer;
  
positive.code:     while GetAttribute(Sym, SymStr, AttrStr, L) do
        Attributes.Add(TAttribute.Create(Sym, L, SymStr, AttrStr, PropStack.Last.Codepage));
  
      while (LCh <> GreaterChar) and (LCh <> EofChar) do
        GetCh;
      if not (Sy in [StyleSy, ScriptSy]) then {in case <!-- comment immediately follows}
        GetCh;
    end;
  
negative.code:     NewBlock.MargArray[MarginBottom] := 0; {open paragraph followed by table, no space}
    SectionList.Add(Section, TagIndex);
    Section := nil;
    if InHref then
      DoAEnd;
    PopAProp(PSy);
    SectionList := NewBlock.OwnerCell;
    if Sy = PEndSy then
  