all test cases are now run through a wrapper script which traps

STDOUT/STDERR, and echos the output only on a test failure. This
supports the usage of Test::More or Test::Harness without breaking the
existing test suite behavior.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8535 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Jason Stewart 2006-01-24 09:00:40 +00:00
commit a33274543f
2 changed files with 19 additions and 2 deletions

View file

@ -0,0 +1,15 @@
#!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
if $running_under_some_shell;
#!/usr/bin/perl -w
use strict;
my $command = shift @ARGV;
my $output = `perl $command`;
die "SWIG Perl test failed: \n\n$output\n"
if $?;
exit(0);