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

* fixed types

Browse Source
This commit is contained in:
daniel 2000-01-07 15:46:20 +00:00
parent b9e2a3edec
commit 8c2e7c0711
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/zlib/zlib.pp
View File

@ -18,6 +18,7 @@ type
Ulongf = Longint;
Pulongf = ^Ulongf;
z_off_t = longint;
pbyte = ^byte;
pbytef = ^byte;
TAllocfunc = function (opaque:pointer; items:uInt; size:uInt):pointer;cdecl;
@ -98,7 +99,7 @@ function inflateReset(var strm:TZStream):longint;cdecl;external libz name 'infla
function compress(dest:pbytef;destLen:uLongf; source : pbytef; sourceLen:uLong):longint;cdecl;external libz name 'compress';
function compress2(dest:pbytef;destLen:uLongf; source : pbytef; sourceLen:uLong; level:longint):longint;cdecl;external libz name 'compress2';
function uncompress(dest:pbytef;destLen:uLongf; source : pbytef; sourceLen:uLong):longint;cdecl;external libz name 'uncompress';
function gzopen(path:pbytef; mode:pbytef):gzFile;cdecl;external libz name 'gzopen';
function gzopen(path:pchar; mode:pbytef):gzFile;cdecl;external libz name 'gzopen';
function gzdopen(fd:longint; mode:pbytef):gzFile;cdecl;external libz name 'gzdopen';
function gzsetparams(thefile:gzFile; level:longint; strategy:longint):longint;cdecl;external libz name 'gzsetparams';
function gzread(thefile:gzFile; buf:pointer; len:cardinal):longint;cdecl;external libz name 'gzread';