Selaa lähdekoodia

* Better signature for Initialize/Finalize dummies

Michaël Van Canneyt 2 vuotta sitten
vanhempi
commit
db729e4c2b
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. 2 2
      rtl/inc/system.fpd

+ 2 - 2
rtl/inc/system.fpd

@@ -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