projects
/
io-compress-brotli.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
unbro should not require maximum buffer size (RT #129480)
[io-compress-brotli.git]
/
t
/
01-uncompress.t
diff --git
a/t/01-uncompress.t
b/t/01-uncompress.t
index f67c5e478bf054f122a0ebb609115b772983c09d..b8fbc6dba22f4a40ae3388d863c337386db5b527 100644
(file)
--- a/
t/01-uncompress.t
+++ b/
t/01-uncompress.t
@@
-2,7
+2,7
@@
use v5.14;
use warnings;
use v5.14;
use warnings;
-use Test::More tests =>
84
;
+use Test::More tests =>
126
;
use File::Slurper qw/read_binary/;
use IO::Uncompress::Brotli;
use File::Slurper qw/read_binary/;
use IO::Uncompress::Brotli;
@@
-12,7
+12,10
@@
for my $test (<brotli/tests/testdata/*.compressed*>) {
$expected = read_binary $expected;
my $decoded = unbro ((scalar read_binary $test), 1_000_000);
$expected = read_binary $expected;
my $decoded = unbro ((scalar read_binary $test), 1_000_000);
- is $decoded, $expected, "$test";
+ is $decoded, $expected, "$test (two-argument unbro)";
+
+ $decoded = unbro scalar read_binary $test;
+ is $decoded, $expected, "$test (one-argument unbro)";
open FH, '<', $test;
binmode FH;
open FH, '<', $test;
binmode FH;
This page took
0.009419 seconds
and
4
git commands to generate.