From 7a33a861d1526894272a8a4b08527ce32316d750 Mon Sep 17 00:00:00 2001 From: Mark Adler Date: Fri, 9 Sep 2011 23:23:27 -0700 Subject: zlib 1.2.1 --- contrib/ada/zlib-thin.ads | 22 ++++++++-------------- 1 file changed, 8 insertions(+), 14 deletions(-) (limited to 'contrib/ada/zlib-thin.ads') diff --git a/contrib/ada/zlib-thin.ads b/contrib/ada/zlib-thin.ads index af1287a..c227374 100644 --- a/contrib/ada/zlib-thin.ads +++ b/contrib/ada/zlib-thin.ads @@ -146,17 +146,6 @@ private package ZLib.Thin is strategy : Int) return Int; -- zlib.h:506 - function deflateBound - (strm : Z_Streamp; - sourceLen : ULong) - return Int; -- zlib.h:595 - - function deflatePrime - (strm : Z_Streamp; - bits : Int; - value : Int) - return Int; -- zlib.h:604 - function inflateSetDictionary (strm : Z_Streamp; dictionary : Byte_Access; @@ -399,6 +388,12 @@ private package ZLib.Thin is function zlibCompileFlags return ULong; + function deflatePrime + (strm : Z_Streamp; + bits : Int; + value : Int) + return Int; + private type Z_Stream is record -- zlib.h:68 @@ -432,8 +427,6 @@ private pragma Import (C, deflateCopy, "deflateCopy"); pragma Import (C, deflateReset, "deflateReset"); pragma Import (C, deflateParams, "deflateParams"); - pragma Import (C, deflateBound, "deflateBound"); - pragma Import (C, deflatePrime, "deflatePrime"); pragma Import (C, inflateSetDictionary, "inflateSetDictionary"); pragma Import (C, inflateSync, "inflateSync"); pragma Import (C, inflateReset, "inflateReset"); @@ -467,13 +460,14 @@ private pragma Import (C, inflateSyncPoint, "inflateSyncPoint"); pragma Import (C, get_crc_table, "get_crc_table"); - -- since zlib 1.2.0: + -- added in zlib 1.2.1: pragma Import (C, inflateCopy, "inflateCopy"); pragma Import (C, compressBound, "compressBound"); pragma Import (C, deflateBound, "deflateBound"); pragma Import (C, gzungetc, "gzungetc"); pragma Import (C, zlibCompileFlags, "zlibCompileFlags"); + pragma Import (C, deflatePrime, "deflatePrime"); pragma Import (C, inflateBackInit, "inflateBackInit_"); -- cgit v1.2.3-55-g6feb