Commit a5974a77901f005f1942240920b67082f3341248
1 parent
ca189800
flate test: don't depend on zlib output
Showing
1 changed file
with
7 additions
and
3 deletions
libtests/qtest/flate.test
| @@ -39,9 +39,13 @@ $td->runtest("run driver", | @@ -39,9 +39,13 @@ $td->runtest("run driver", | ||
| 39 | 39 | ||
| 40 | check_file("farbage", "a6449c61db5b0645c0693b7560b77a60"); | 40 | check_file("farbage", "a6449c61db5b0645c0693b7560b77a60"); |
| 41 | 41 | ||
| 42 | -$td->runtest("compressed file correct", | ||
| 43 | - {$td->FILE => "farbage.1"}, | ||
| 44 | - {$td->FILE => "compressed"}); | 42 | +my $size_uncompressed = (stat("farbage"))[7]; |
| 43 | +my $size_compressed = (stat("farbage.1"))[7]; | ||
| 44 | +$td->runtest("compressed is smaller", | ||
| 45 | + {$td->STRING => | ||
| 46 | + ($size_compressed < $size_uncompressed | ||
| 47 | + ? "YES\n" : "$size_compressed $size_uncompressed\n")}, | ||
| 48 | + {$td->STRING => "YES\n"}); | ||
| 45 | 49 | ||
| 46 | $td->runtest("uncompress filter works", | 50 | $td->runtest("uncompress filter works", |
| 47 | {$td->FILE => "farbage"}, | 51 | {$td->FILE => "farbage"}, |