diff options
| author | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-11-19 11:37:18 +0000 |
|---|---|---|
| committer | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-11-19 11:37:18 +0000 |
| commit | f4e4a8d52df6b48ce110623ce96e0a3c0c6411fb (patch) | |
| tree | 2a2e129d30b2b5e10503cd0a70ab8fd2af1f79b4 /packages | |
| parent | 81ed07692f7378eba20beb131de0da5405b303e9 (diff) | |
| download | fpc-f4e4a8d52df6b48ce110623ce96e0a3c0c6411fb.tar.gz | |
* modified zlib patch to resolve 12667 by zipfelvo
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12176 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages')
| -rw-r--r-- | packages/zlib/src/zlib.pp | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/packages/zlib/src/zlib.pp b/packages/zlib/src/zlib.pp index 3dc170f412..df8268fa4c 100644 --- a/packages/zlib/src/zlib.pp +++ b/packages/zlib/src/zlib.pp @@ -11,7 +11,8 @@ interface {$ifdef unix} {$linklib c} {$endif} -{$PACKRECORDS 4} + +{$packrecords c} uses ctypes; @@ -35,13 +36,12 @@ const type { Compatible with paszlib } - Uint = Longint; - Ulong = Longint; - Ulongf = Longint; + Uint = cuint; + Ulong = culong; + Ulongf = Ulong; Pulongf = ^Ulongf; - z_off_t = longint; - pbyte = ^byte; - pbytef = ^byte; + z_off_t = coff_t; + pbytef = pbyte; TAllocfunc = function (opaque:pointer; items:uInt; size:uInt):pointer;cdecl; TFreeFunc = procedure (opaque:pointer; address:pointer);cdecl; @@ -62,7 +62,7 @@ type zalloc : TAllocFunc; zfree : TFreeFunc; opaque : pointer; - data_type : longint; + data_type : cint; adler : uLong; reserved : uLong; end; |