Skip Menu |

This queue is for tickets about the Compress-Raw-Zlib CPAN distribution.

Report information
The Basics
Id: 56293
Status: resolved
Priority: 0/
Queue: Compress-Raw-Zlib

People
Owner: Nobody in particular
Requestors: at [...] altlinux.ru
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: 2.026



Subject: fixed ZLIB_VERNUM for Z_TREES
Date: Sun, 4 Apr 2010 16:27:38 +0400
To: bug-Compress-Raw-Zlib [...] rt.cpan.org
From: Alexey Tourbin <at [...] altlinux.ru>
--- Makefile.PL | 2 +- fallback/constants.h | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/Makefile.PL b/Makefile.PL index 18b8ea6..22c1a5f 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -136,7 +136,7 @@ my @names = qw( #ZLIB_VERNUM my %verSpecificNames = ( - Z_TREES => '124', + Z_TREES => '1240', ); if (eval {require ExtUtils::Constant; 1}) { diff --git a/fallback/constants.h b/fallback/constants.h index 409d11f..9848255 100644 --- a/fallback/constants.h +++ b/fallback/constants.h @@ -85,7 +85,7 @@ constant_7 (pTHX_ const char *name, IV *iv_return) { case 'S': if (memEQ(name, "Z_TREE", 6)) { /* S */ -#if ZLIB_VERNUM >= 0x124 +#if ZLIB_VERNUM >= 0x1240 *iv_return = Z_TREES; return PERL_constant_ISIV; #else @@ -332,7 +332,7 @@ my @names = (qw(DEF_WBITS MAX_MEM_LEVEL MAX_WBITS OS_CODE Z_ASCII Z_PARTIAL_FLUSH Z_RLE Z_STREAM_END Z_STREAM_ERROR Z_SYNC_FLUSH Z_UNKNOWN Z_VERSION_ERROR), {name=>"ZLIB_VERSION", type=>"PV"}, - {name=>"Z_TREES", type=>"IV", macro=>["#if ZLIB_VERNUM >= 0x124\n", "#endif\n"]}); + {name=>"Z_TREES", type=>"IV", macro=>["#if ZLIB_VERNUM >= 0x1240\n", "#endif\n"]}); print constant_types(), "\n"; # macro defs foreach (C_constant ("Zlib", 'constant', 'IV', $types, undef, 3, @names) ) { -- 1.7.0.4
Thanks Alexy cheers Paul