diff options
| author | Jay Berkenbilt <ejb@ql.org> | 2023-12-19 14:32:19 +0100 |
|---|---|---|
| committer | Jay Berkenbilt <ejb@ql.org> | 2023-12-20 13:07:35 +0100 |
| commit | a5974a77901f005f1942240920b67082f3341248 (patch) | |
| tree | 40013cac139e6895ac74881949e0978683257369 | |
| parent | ca189800faa80c3666f0249c4c1b6868919c8880 (diff) | |
| download | qpdf-a5974a77901f005f1942240920b67082f3341248.tar.zst | |
flate test: don't depend on zlib output
| -rw-r--r-- | libtests/qtest/flate.test | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/libtests/qtest/flate.test b/libtests/qtest/flate.test index 3d99bc3a..c32b15b1 100644 --- a/libtests/qtest/flate.test +++ b/libtests/qtest/flate.test @@ -39,9 +39,13 @@ $td->runtest("run driver", check_file("farbage", "a6449c61db5b0645c0693b7560b77a60"); -$td->runtest("compressed file correct", - {$td->FILE => "farbage.1"}, - {$td->FILE => "compressed"}); +my $size_uncompressed = (stat("farbage"))[7]; +my $size_compressed = (stat("farbage.1"))[7]; +$td->runtest("compressed is smaller", + {$td->STRING => + ($size_compressed < $size_uncompressed + ? "YES\n" : "$size_compressed $size_uncompressed\n")}, + {$td->STRING => "YES\n"}); $td->runtest("uncompress filter works", {$td->FILE => "farbage"}, |