anchor.diff:  
     Slot: THelpTopicSlot;
   begin
  -  _Title:= nil;
  +  _Title := '';
     _GlobalDictionary:= Dictionary;
     _ContentsGroupIndex := 0;
   
  
positive.code:       Links.Add( Link );
      end
      else
        Link := Links[ LinkIndex ];
  
      OutputString := '<link '
                   + IntToStr( LinkIndex )
  
negative.code: 
    pSlotArray = ^SlotArray;
  
    TTopic = class(TObject)
    protected
      _pTOCEntry: pTTOCEntryStart;
      _Slots: pSlotArray;
      _NumSlots: longint;
      _NumSlotsUsed: longint;
      _Title: string;
      _GlobalDictionary: TList;
  
      _ShowInContents: boolean;
  