Explorar o código

* Fixed signature of zliballocmem

git-svn-id: trunk@17210 -
michael %!s(int64=14) %!d(string=hai) anos
pai
achega
d4b071ed9a
Modificáronse 1 ficheiros con 2 adicións e 2 borrados
  1. 2 2
      packages/zlib/src/zlib.pp

+ 2 - 2
packages/zlib/src/zlib.pp

@@ -1212,7 +1212,7 @@ function zError(err: cint): pchar; cdecl; external libz name 'zError';
 function inflateSyncPoint(var z: z_stream): cint; cdecl; external libz name 'inflateSyncPoint';
 function inflateSyncPoint(var z: z_stream): cint; cdecl; external libz name 'inflateSyncPoint';
 function get_crc_table: pointer; cdecl; external libz name 'get_crc_table';
 function get_crc_table: pointer; cdecl; external libz name 'get_crc_table';
 
 
-function zlibAllocMem(AppData: Pointer; Items, Size: Integer): Pointer; cdecl;
+function zlibAllocMem(AppData: Pointer; Items, Size: UInt): Pointer; cdecl;
 procedure zlibFreeMem(AppData, Block: Pointer);  cdecl;
 procedure zlibFreeMem(AppData, Block: Pointer);  cdecl;
 
 
 implementation
 implementation
@@ -1242,7 +1242,7 @@ begin
   Result := inflateBackInit_(strm, windowBits, window, ZLIB_VERSION, sizeof(z_stream));
   Result := inflateBackInit_(strm, windowBits, window, ZLIB_VERSION, sizeof(z_stream));
 end;
 end;
 
 
-function zlibAllocMem(AppData: Pointer; Items, Size: Integer): Pointer; cdecl;
+function zlibAllocMem(AppData: Pointer; Items, Size: UInt): Pointer; cdecl;
 
 
   begin
   begin
     Result := AllocMem(Items * Size);
     Result := AllocMem(Items * Size);