summaryrefslogtreecommitdiff
path: root/bin/auto_run_tests.pl
diff options
context:
space:
mode:
authorirfan <irfan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-11-20 01:55:01 +0000
committerirfan <irfan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-11-20 01:55:01 +0000
commit32ede8e1ab59e9934bd229b5355bb0969697f9de (patch)
tree4fd48f0e02ab502efbcceb0767a31a2c8d5d63c1 /bin/auto_run_tests.pl
parent698f4b12141c17493b6ca84266d77aee019ce06d (diff)
downloadATCD-32ede8e1ab59e9934bd229b5355bb0969697f9de.tar.gz
ChangeLogTag: Tue Nov 19 18:14:10 2002 Pradeep Gore <pradeep@oomworks.com>
Diffstat (limited to 'bin/auto_run_tests.pl')
-rwxr-xr-xbin/auto_run_tests.pl20
1 files changed, 16 insertions, 4 deletions
diff --git a/bin/auto_run_tests.pl b/bin/auto_run_tests.pl
index 4b011b16014..e0bd2b73b47 100755
--- a/bin/auto_run_tests.pl
+++ b/bin/auto_run_tests.pl
@@ -65,10 +65,22 @@ foreach $test ($config_list->valid_entries ()) {
chdir ($ACE_ROOT."/$directory")
|| die "Error: Cannot chdir to $ACE_ROOT/$directory";
- if (! -e $program) {
- print STDERR "Error: $test does not exist\n";
- next;
- }
+ if ($program =~ /(.*?) (.*)/)
+ {
+ if (! -e $1)
+ {
+ print STDERR "Error: $directory.$1 does not exist\n";
+ next;
+ }
+ }
+ else
+ {
+ if (! -e $program)
+ {
+ print STDERR "Error: $directory.$program does not exist\n";
+ next;
+ }
+ }
### Genrate the -ExeSubDir and -Config options
my $inherited_options = " -ExeSubDir $PerlACE::Process::ExeSubDir ";