X-Git-Url: http://git.imager.perl.org/imager.git/blobdiff_plain/02d1d62827cef86398edc2013f7d2ff04bf21c63..515480c74afded63e34d7f45416672030ed80381:/bigtest.perl

diff --git a/bigtest.perl b/bigtest.perl
index 1d45f448..1fcbc380 100644
--- a/bigtest.perl
+++ b/bigtest.perl
@@ -1,7 +1,7 @@
 #!perl -w
 use strict;
 # tests Imager with every combination of options
-my @opts = qw(jpeg tiff png gif ungif T1-fonts TT-fonts);
+my @opts = qw(jpeg tiff png gif ungif T1-fonts TT-fonts freetype2);
 
 # each option gets a bit
 my %bits;
@@ -17,37 +17,38 @@ getopts('vd', \%opts);
 my $top = (1 << @opts)-1;
 
 my @results;
+my $testlog = "bigtest.txt";
 
-unlink('testout/bigtest.txt');
+unlink $testlog;
 my $total = 0;
 my $good = 0;
 system("$make clean") if -e 'Makefile' && !$opts{d};
 for my $set (0..$top) {
   ++$total;
   $ENV{IM_ENABLE} = join(' ', grep($set & $bits{$_}, @opts));
-  print STDERR $opts{v} ? "Enable: $ENV{IM_ENABLE}\n" : '.';
-  system("echo '****' \$IM_ENABLE >>testout/bigtest.txt");
+  print STDERR $opts{v} ? "$set/$top Enable: $ENV{IM_ENABLE}\n" : '.';
+  system("echo '****' \$IM_ENABLE >>$testlog");
   if ($opts{d}) {
-    if (system("$make $makeopts disttest >>testout/bigtest.txt 2>&1")) {
+    if (system("$make $makeopts disttest >>$testlog.txt 2>&1")) {
       push(@results, [ $ENV{IM_ENABLE}, 'disttest failed' ]);
       next;
     }
   }
   else {
     unlink 'Makefile';
-    if (system("$perl Makefile.PL >>testout/bigtest.txt 2>&1")) {
+    if (system("$perl Makefile.PL >>$testlog 2>&1")) {
       push(@results, [ $ENV{IM_ENABLE}, 'Makefile.PL failed' ]);
       next;
     }
-    if (system("$make $makeopts >>testout/bigtest.txt 2>&1")) {
+    if (system("$make $makeopts >>$testlog 2>&1")) {
       push(@results, [ $ENV{IM_ENABLE}, 'make failed' ]);
       next;
     }
-    if (system("$make test >>testout/bigtest.txt 2>&1")) {
+    if (system("$make test >>$testlog 2>&1")) {
       push(@results, [ $ENV{IM_ENABLE}, 'test failed' ]);
       next;
     }
-    if (system("$make clean >>testout/bigtest.txt 2>&1")) {
+    if (system("$make clean >>$testlog 2>&1")) {
       push(@results, [ $ENV{IM_ENABLE}, 'clean failed' ]);
       next;
     }
@@ -64,7 +65,7 @@ foreach my $row (@results) {
 }
 print "-" x 71, "\n";
 print "Total: $total  Successes: $good  Failures: ",$total-$good,"\n";
-print "Output in testout/bigtest.txt\n";
+print "Output in $testlog\n";
 
 __END__