Fixing tests

4 files changed, 8 insertions, 8 deletions

diff --git a/TAO/tests/Bug_1020_Basic_Regression/run_test.pl b/TAO/tests/Bug_1020_Basic_Regression/run_test.pl
index 974155d35fd..5b0df8e1a27 100755
--- a/TAO/tests/Bug_1020_Basic_Regression/run_test.pl
+++ b/TAO/tests/Bug_1020_Basic_Regression/run_test.pl
@@ -69,7 +69,7 @@ while($elapsed < $max_running_time) {
 
     # ... wait for the clients to die unless they did not startup,
     # ignore errors because they intentionally crash themselves!
-    $CL->WaitKill($server->ProcessStartWaitInterval() + 20) unless $client < 0;
+    $CL->WaitKill($server->ProcessStartWaitInterval() + 20, {self_crash => 1}) unless $client < 0;
 
     $elapsed = time() - $start_time;
 }
diff --git a/TAO/tests/Bug_1020_Regression/run_test.pl b/TAO/tests/Bug_1020_Regression/run_test.pl
index 164e3c57faa..8f292008c8f 100755
--- a/TAO/tests/Bug_1020_Regression/run_test.pl
+++ b/TAO/tests/Bug_1020_Regression/run_test.pl
@@ -111,7 +111,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL1->WaitKill ($client1->ProcessStopWaitInterval() + 15);
+    $client_status = $CL1->WaitKill ($client1->ProcessStopWaitInterval() + 15, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
@@ -120,7 +120,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL2->WaitKill ($client2->ProcessStopWaitInterval() + 15);
+    $client_status = $CL2->WaitKill ($client2->ProcessStopWaitInterval() + 15, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
@@ -128,7 +128,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL3->WaitKill ($client3->ProcessStopWaitInterval() + 15);
+    $client_status = $CL3->WaitKill ($client3->ProcessStopWaitInterval() + 15, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
diff --git a/TAO/tests/Bug_1269_Regression/run_test.pl b/TAO/tests/Bug_1269_Regression/run_test.pl
index dd9d4841c92..04acb5009c2 100755
--- a/TAO/tests/Bug_1269_Regression/run_test.pl
+++ b/TAO/tests/Bug_1269_Regression/run_test.pl
@@ -108,7 +108,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL1->WaitKill ($client1->ProcessStopWaitInterval() + 45);
+    $client_status = $CL1->WaitKill ($client1->ProcessStopWaitInterval() + 45, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
@@ -117,7 +117,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL2->WaitKill ($client2->ProcessStopWaitInterval() + 45);
+    $client_status = $CL2->WaitKill ($client2->ProcessStopWaitInterval() + 45, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
@@ -125,7 +125,7 @@ while($elapsed < $max_running_time) {
         exit 1;
     }
 
-    $client_status = $CL3->WaitKill ($client3->ProcessStopWaitInterval() + 45);
+    $client_status = $CL3->WaitKill ($client3->ProcessStopWaitInterval() + 45, {self_crash => 1});
     if ($client_status != 0) {
         print STDERR "ERROR: client returned $client_status\n";
         $SV->Kill (); $SV->TimedWait (1);
diff --git a/TAO/tests/Bug_1482_Regression/run_test.pl b/TAO/tests/Bug_1482_Regression/run_test.pl
index ed1debdc4f0..33c513c74c0 100755
--- a/TAO/tests/Bug_1482_Regression/run_test.pl
+++ b/TAO/tests/Bug_1482_Regression/run_test.pl
@@ -114,7 +114,7 @@ while($elapsed < $max_running_time) {
 
     sleep (90);
 
-    $server_status = $SV->WaitKill ($server->ProcessStopWaitInterval());
+    $server_status = $SV->WaitKill ($server->ProcessStopWaitInterval(), {self_crash => 1});
     if ($server_status < 0) {
         print STDERR "ERROR: server returned $server_status\n";
         $CL1->Kill (); $CL1->TimedWait (1);