diff options
Diffstat (limited to 'TAO/tests/Collocation_Oneway_Tests/run_test.pl')
-rwxr-xr-x | TAO/tests/Collocation_Oneway_Tests/run_test.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/TAO/tests/Collocation_Oneway_Tests/run_test.pl b/TAO/tests/Collocation_Oneway_Tests/run_test.pl index 61a15200523..8a9bdcfa325 100755 --- a/TAO/tests/Collocation_Oneway_Tests/run_test.pl +++ b/TAO/tests/Collocation_Oneway_Tests/run_test.pl @@ -21,7 +21,7 @@ else { print STDERR "======== Running in Default Mode \n"; $SV->Arguments ("-o $iorfile -k file://$iorfile -m none "); -$sv = $SV->SpawnWaitKill (60); +$sv = $SV->SpawnWaitKill ($PerlACE::wait_interval_for_process_creation); if ($sv != 0) { print STDERR "ERROR in Collocation_Oneway_Test\n"; @@ -31,7 +31,7 @@ unlink $iorfile; print STDERR "======== Running in Default Mode \n"; $SV->Arguments ("-o $iorfile -k file://$iorfile -m transport"); -$sv = $SV->SpawnWaitKill (60); +$sv = $SV->SpawnWaitKill ($PerlACE::wait_interval_for_process_creation); if ($sv != 0) { print STDERR "ERROR in Collocation_Oneway_Test\n"; @@ -41,7 +41,7 @@ unlink $iorfile; print STDERR "======== Running in Default Mode \n"; $SV->Arguments ("-o $iorfile -k file://$iorfile -m server"); -$sv = $SV->SpawnWaitKill (60); +$sv = $SV->SpawnWaitKill ($PerlACE::wait_interval_for_process_creation); if ($sv != 0) { print STDERR "ERROR in Collocation_Oneway_Test\n"; @@ -51,7 +51,7 @@ unlink $iorfile; print STDERR "======== Running in Default Mode \n"; $SV->Arguments ("-o $iorfile -k file://$iorfile -m target"); -$sv = $SV->SpawnWaitKill (60); +$sv = $SV->SpawnWaitKill ($PerlACE::wait_interval_for_process_creation); if ($sv != 0) { print STDERR "ERROR in Collocation_Oneway_Test\n"; |