anchor.diff:    Ada: TATAdapterHilite;
   begin
     EdIndex:= EditorObjToIndex(Ed);
  +  if EdIndex<0 then exit;
     Ada:= FLexerBackup[EdIndex];
     if Assigned(Ada) then
     begin
  
positive.code:     FInitialLexer2: TecSyntAnalyzer;
      FSaveHistory: boolean;
      FEditorsLinked: boolean;
      FCachedTreeview: array[0..1] of TTreeView;
      FLexerBackup: array[0..1] of TATAdapterHilite;
      FLexerChooseFunc: TecLexerChooseFunc;
  
negative.code:   end;
  end;
  
  function TEditorFrame.GetTabExtModified(EdIndex: integer): boolean;
  begin
    Result:= FTabExtModified[EdIndex];
  end;
  
  function TEditorFrame.GetTabExtDeleted(EdIndex: integer): boolean;
  begin
    Result:= FTabExtDeleted[EdIndex];
  end;
  
  procedure TEditorFrame.SetTabExtModified(EdIndex: integer; AValue: boolean);
  var
    Gr: TATGroups;
    Pages: TATPages;
    NLocalGroups, NGlobalGroup, NTab: integer;
    D: TATTabData;
  begin
    if FTabExtModified[EdIndex]=AValue then exit;
    FTabExtModified[EdIndex]:= AValue;
    GetFrameLocation(Self, Gr, Pages, NLocalGroups, NGlobalGroup, NTab);
    D:= Pages.Tabs.GetTabData(NTab);
    if Assigned(D) then
    begin
      if EdIndex=0 then
        D.TabExtModified:= AValue
      else
        D.TabExtModified2:= AValue;
      Pages.Tabs.Invalidate;
    end;
  end;
  
  procedure TEditorFrame.SetTabExtDeleted(EdIndex: integer; AValue: boolean);
  var
    Gr: TATGroups;
    Pages: TATPages;
    NLocalGroups, NGlobalGroup, NTab: integer;
    D: TATTabData;
  begin
    if FTabExtDeleted[EdIndex]=AValue then exit;
    FTabExtDeleted[EdIndex]:= AValue;
    GetFrameLocation(Self, Gr, Pages, NLocalGroups, NGlobalGroup, NTab);
    D:= Pages.Tabs.GetTabData(NTab);
    if Assigned(D) then
    begin
      if EdIndex=0 then
        D.TabExtDeleted:= AValue
      else
        D.TabExtDeleted2:= AValue;
      Pages.Tabs.Invalidate;
    end;
  end;
  