From f4e4a8d52df6b48ce110623ce96e0a3c0c6411fb Mon Sep 17 00:00:00 2001
From: florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Wed, 19 Nov 2008 11:37:18 +0000
Subject: * modified zlib patch to resolve 12667 by zipfelvo

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12176 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 packages/zlib/src/zlib.pp | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'packages')

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;
-- 
cgit v1.2.1