paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-29 09:20:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Better signature for Initialize/Finalize dummies

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-19 15:22:45 +01:00
parent a35f66a730
commit 86ffe69380
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/system.fpd
View File

@ -97,8 +97,8 @@ Procedure Fail;
Function TypeOf(T : TObjectType) : Pointer;
Function IsManagedType(T : TType) : Boolean;
Function IsConstValue(V : TAnyType) : Boolean;
Procedure Initialize(Var T : TAnyType; ACount : SizeInt = 1);
Procedure Finalize(Var T : TAnyType; ACount : SizeInt = 1);
Procedure Initialize(Var T : TManagedType; ACount : SizeInt = 1);
Procedure Finalize(Var T : TManagedType; ACount : SizeInt = 1);
{$IFNDEF GO32V2}
Var