diff options
author | davidovski <david@davidovski.xyz> | 2022-05-04 23:52:30 +0100 |
---|---|---|
committer | davidovski <david@davidovski.xyz> | 2022-05-04 23:52:30 +0100 |
commit | 739c65c54cb0e957df5e9b76f93fb02554e5cac3 (patch) | |
tree | 09ddfa0a342f3ea9de136cb50abdd79821bf1b53 /extra/perl/zlib-test.patch | |
parent | 4c585ad54388285500fd18a6aaa516894e0f2c16 (diff) |
moved everything to new file formatting
Diffstat (limited to 'extra/perl/zlib-test.patch')
-rw-r--r-- | extra/perl/zlib-test.patch | 80 |
1 files changed, 0 insertions, 80 deletions
diff --git a/extra/perl/zlib-test.patch b/extra/perl/zlib-test.patch deleted file mode 100644 index 1cb8f5e..0000000 --- a/extra/perl/zlib-test.patch +++ /dev/null @@ -1,80 +0,0 @@ -diff --git a/cpan/Compress-Raw-Zlib/t/02zlib.t b/cpan/Compress-Raw-Zlib/t/02zlib.t -index 64c8944..9b2e9cb 100644 ---- a/cpan/Compress-Raw-Zlib/t/02zlib.t -+++ b/cpan/Compress-Raw-Zlib/t/02zlib.t -@@ -13,6 +13,7 @@ use bytes; - use Test::More ; - use CompTestUtils; - -+use constant ZLIB_1_2_12_0 => 0x12C0; - - BEGIN - { -@@ -490,7 +491,16 @@ SKIP: - last if $status == Z_STREAM_END or $status != Z_OK ; - } - -- cmp_ok $status, '==', Z_DATA_ERROR ; -+ # Z_STREAM_END returned by 1.12.2, Z_DATA_ERROR for older zlib -+ if (ZLIB_VERNUM >= ZLIB_1_2_12_0) -+ { -+ cmp_ok $status, '==', Z_STREAM_END ; -+ } -+ else -+ { -+ cmp_ok $status, '==', Z_DATA_ERROR ; -+ } -+ - is $GOT, $goodbye ; - - -@@ -514,7 +524,17 @@ SKIP: - is length($rest), $len2, "expected compressed output"; - - $GOT = ''; -- cmp_ok $k->inflate($rest, $GOT), '==', Z_DATA_ERROR, "inflate returns Z_DATA_ERROR"; -+ $status = $k->inflate($rest, $GOT); -+ # Z_STREAM_END returned by 1.12.2, Z_DATA_ERROR for older zlib -+ if (ZLIB_VERNUM >= ZLIB_1_2_12_0) -+ { -+ cmp_ok $status, '==', Z_STREAM_END ; -+ } -+ else -+ { -+ cmp_ok $status, '==', Z_DATA_ERROR ; -+ } -+ - is $GOT, $goodbye ; - } - -diff --git a/cpan/IO-Compress/t/cz-03zlib-v1.t b/cpan/IO-Compress/t/cz-03zlib-v1.t -index 9b75f9b..41734d0 100644 ---- a/cpan/IO-Compress/t/cz-03zlib-v1.t -+++ b/cpan/IO-Compress/t/cz-03zlib-v1.t -@@ -14,6 +14,8 @@ use Test::More ; - use CompTestUtils; - use Symbol; - -+use constant ZLIB_1_2_12_0 => 0x12C0; -+ - BEGIN - { - # use Test::NoWarnings, if available -@@ -700,7 +702,16 @@ EOM - - ($GOT, $status) = $k->inflate($rest) ; - -- ok $status == Z_DATA_ERROR ; -+ # Z_STREAM_END returned by 1.12.2, Z_DATA_ERROR for older zlib -+ if (ZLIB_VERNUM >= ZLIB_1_2_12_0) -+ { -+ cmp_ok $status, '==', Z_STREAM_END ; -+ } -+ else -+ { -+ cmp_ok $status, '==', Z_DATA_ERROR ; -+ } -+ - ok $Z . $GOT eq $goodbye ; - } - |