make it clear that noalpha doesn't compose

[imager.git] / bench / tifthread.pl

diff --git a/bench/tifthread.pl b/bench/tifthread.pl
index 719010621172aac3aadf6f23b461aba4789646b9..0a66ce5c939e475821b12ff2f0935965266a4326 100644 (file)
--- a/bench/tifthread.pl
+++ b/bench/tifthread.pl
@@ -6,6 +6,15 @@ use Imager;
 ++$|;
 Imager->preload;
 
+# as a TIFF this file is large, build it from largeish.jpg if it
+# doesn't exist
+unless (-f "bench/largish.tif") {
+  my $im = Imager->new(file => "bench/largish.jpg")
+    or die "Cannot read bench/largish.jpg:", Imager->errstr;
+  $im->write(file => "bench/largish.tif")
+    or die "Cannot write bench.largish.tif:", $im->errstr;
+}
+
 my @tests =
   (
    [ "bench/largish.tif", "" ],