anchor.diff:    TDefaultTendency = class(TEditorTendency)
     protected
       procedure Init; override;
  -    function GetGroups: TFileGroups; override;
     public
       function GetDefaultGroup: TFileGroup; override;
     end;
  
positive.code: end;
  
  { TEditorTendency }
  
  function TEditorTendency.GetGroups: TFileGroups;
  begin
    Result := FGroups;
  end;
  
  procedure TEditorTendency.DoRun(Info: TmneRunInfo);
  begin
  
negative.code:     procedure Unprepare;
      //
      property Capabilities: TEditorCapabilities read FCapabilities;
      property Groups: TFileGroups read FGroups;
      property Debug: TEditorDebugger read FDebug write SetDebug;
    published
      property Command: string read FCommand write FCommand; //like php.exe or gdc.exe or fpc.exe
  