* remove empty override tpersist.destroy(), patch by Luiz Americo, Mantis #21387

git-svn-id: trunk@20460 -

rtl/objpas/classes/classesh.inc

@@ -396,7 +396,6 @@ type
     procedure DefineProperties(Filer: TFiler); virtual;
     function  GetOwner: TPersistent; dynamic;
   public
-    destructor Destroy; override;
     procedure Assign(Source: TPersistent); virtual;
     function  GetNamePath: string; virtual; {dynamic;}
   end;

rtl/objpas/classes/persist.inc

@@ -49,13 +49,6 @@ begin
   Result:=Nil;
 end;
 
-destructor TPersistent.Destroy;
-
-begin
-  Inherited Destroy;
-end;
-
-
 procedure TPersistent.Assign(Source: TPersistent);
 
 begin