Jelajahi Sumber

Changed the memory allocation/deallocation to match the new ReAllocMem structure.

lazarus 26 tahun lalu
induk
melakukan
ef17ea6ec2
1 mengubah file dengan 3 tambahan dan 3 penghapusan
  1. 3 3
      fcl/inc/zstream.pp

+ 3 - 3
fcl/inc/zstream.pp

@@ -119,14 +119,14 @@ begin
   DFreeMem(P);
 end;
 
-function zlibAllocMem(AppData: Pointer; Items, Size: Integer): Pointer;cdecl;
+function zlibAllocMem(opaque:pointer; items:uInt; size:uInt):pointer;cdecl;
 begin
   Result:=DGetMem(Items*Size);
 end;
 
-procedure zlibFreeMem(AppData, Block: Pointer);cdecl;
+procedure zlibFreeMem(opaque:pointer; address:pointer);cdecl;
 begin
-  DFreeMem(Block);
+  DFreeMem(address);
 end;