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 Test::More tests => 84;
+use Test::More tests => 126;
 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);
-       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;