diff options
author | Johnny Willemsen <jwillemsen@remedy.nl> | 2009-03-16 19:32:35 +0000 |
---|---|---|
committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2009-03-16 19:32:35 +0000 |
commit | eb363f5812cce3ac1a3ad58c4af2d54788e4876f (patch) | |
tree | 844ce29dbc2cc8b6fd939378c1f21b7f74c5ab95 | |
parent | 843954b63cc0db5894465ec9cfb48e7c7d5a3672 (diff) | |
download | ATCD-eb363f5812cce3ac1a3ad58c4af2d54788e4876f.tar.gz |
-rwxr-xr-x | TAO/tests/RTCORBA/Collocation/run_test.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/TAO/tests/RTCORBA/Collocation/run_test.pl b/TAO/tests/RTCORBA/Collocation/run_test.pl index 1530202e0a5..a3aa59a8936 100755 --- a/TAO/tests/RTCORBA/Collocation/run_test.pl +++ b/TAO/tests/RTCORBA/Collocation/run_test.pl @@ -17,17 +17,17 @@ my $server = PerlACE::TestTarget::create_target (1) || die "Create target 1 fail $T = $server->CreateProcess ("Collocation"); if ($continuous) { - $T->Arguments("-ORBSvcConf continuous$PerlACE::svcconf_ext"); + $T->Arguments("-ORBSvcConf continuous$PerlACE::svcconf_ext"); } $test = $T->SpawnWaitKill(60); if ($test == 2) { - # Mark as no longer running to avoid errors on exit. - $T->{RUNNING} = 0; + # Mark as no longer running to avoid errors on exit. + $T->{RUNNING} = 0; } else { - if ($test != 0) { - print STDERR "ERROR: test returned $test\n"; - exit 1; + if ($test != 0) { + print STDERR "ERROR: test returned $test\n"; + exit 1; } } |