mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-02 19:43:15 +01:00
* remove empty override tpersist.destroy(), patch by Luiz Americo, Mantis #21387
git-svn-id: trunk@20460 -
This commit is contained in:
parent
49e3a24413
commit
39bc3b9dcf
@ -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;
|
||||
|
||||
@ -49,13 +49,6 @@ begin
|
||||
Result:=Nil;
|
||||
end;
|
||||
|
||||
destructor TPersistent.Destroy;
|
||||
|
||||
begin
|
||||
Inherited Destroy;
|
||||
end;
|
||||
|
||||
|
||||
procedure TPersistent.Assign(Source: TPersistent);
|
||||
|
||||
begin
|
||||
|
||||
Loading…
Reference in New Issue
Block a user