summaryrefslogtreecommitdiff
path: root/TAO/tests/Muxing/run_test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/Muxing/run_test.pl')
-rwxr-xr-xTAO/tests/Muxing/run_test.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/TAO/tests/Muxing/run_test.pl b/TAO/tests/Muxing/run_test.pl
index a96127632e8..9447f83d1c0 100755
--- a/TAO/tests/Muxing/run_test.pl
+++ b/TAO/tests/Muxing/run_test.pl
@@ -16,6 +16,9 @@ $SV = new PerlACE::Process ("server", "-o $iorfile");
$CL1 = new PerlACE::Process ("client", " -k file://$iorfile");
$CL2 = new PerlACE::Process ("client", " -k file://$iorfile");
+for ($i=0; $i!=75; $i++)
+{
+ print STDERR "******************* $i\n";
$SV->Spawn ();
if (PerlACE::waitforfile_timed ($iorfile, 15) == -1) {
@@ -49,5 +52,6 @@ if ($server != 0) {
}
unlink $iorfile;
+}
exit $status;