anchor.diff:    if Links = nil then
       Links:= TList.Create;
   
  -  S:= TAString.Create;
  +  S := '';
   {  Text:= StrNew( S.AsPChar );
     S.Destroy;
     exit;}
  
positive.code:           Word := '';
  
          Word:= SubstituteAngleBrackets( Word );
          if HighlightWords[ GlobalDictIndex ] > 0 then
            StringToAdd := '<red>' + Word + '<black>'
          else
            StringToAdd := Word;
  
negative.code:   pData: pInt8;
    pSlotEnd: pInt8;
  
    S: string;
    Word: string;
  
    GlobalDictIndex: int32;
  