anchor.diff:  var
     lText: String;
     ImageIndices: TList;
  -  LinkIndex: longint;
  -  Link: THelpLink;
     HelpFile: THelpFile;
     Topic: TTopic;
     HighlightWordSequences: TList;
  
positive.code:   Note: THelpNote;
    NotesFile: TStringList;
    TopicIndex: integer;
    s: TfpgString;
  begin
    ProfileEvent('Save notes for ' + AHelpFile.Filename);
    if not AHelpFile.NotesLoaded then
  
negative.code:   if not fpgFileExists( BookmarksFileName ) then
      Exit;
  
    {$NOTE: Replace this with TStringList or TStringStream.}
    FileMode := fmInput;
    AssignFile( BookmarksFile, BookmarksFileName );
    try
  