summaryrefslogtreecommitdiff
path: root/TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl
diff options
context:
space:
mode:
authorelliott_c <elliott_c@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-11-05 19:15:33 +0000
committerelliott_c <elliott_c@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-11-05 19:15:33 +0000
commit45e6ca7645269bcdfe0db82ebfb2ead2670e63e8 (patch)
treecc4af75ee3ce28d1c32f574bf5eae60dc2d1a7b1 /TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl
parent51e453e0e87c7e55327c2e5c0ed5fa7b05209ab0 (diff)
downloadATCD-45e6ca7645269bcdfe0db82ebfb2ead2670e63e8.tar.gz
ChangeLogTag: Mon Nov 5 13:08:29 2001 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl')
-rwxr-xr-xTAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl b/TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl
index e86186b36e8..7fa74534aad 100755
--- a/TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl
+++ b/TAO/orbsvcs/tests/EC_Custom_Marshal/run_test.pl
@@ -11,7 +11,7 @@ use PerlACE::Run_Test;
$port = PerlACE::uniqueid () + 10001; # This can't be 10000 on Chorus 4.0
$NS_ior = PerlACE::LocalFile ("NameService.ior");
-$sleeptime = 5;
+$sleeptime = 8;
$status = 0;
$NS = new PerlACE::Process ("../../Naming_Service/Naming_Service",
@@ -25,7 +25,7 @@ $S = new PerlACE::Process ("ECM_Supplier",
$NS->Spawn ();
-if (PerlACE::waitforfile_timed ($NS_ior, 5) == -1) {
+if (PerlACE::waitforfile_timed ($NS_ior, 10) == -1) {
print STDERR "ERROR: waiting for naming service IOR file\n";
$NS->Kill ();
exit 1;