diff options
| author | Son Dinh <dinhs@objectcomputing.com> | 2022-04-07 16:56:03 -0500 |
|---|---|---|
| committer | Son Dinh <dinhs@objectcomputing.com> | 2022-04-18 11:34:31 -0500 |
| commit | 8085c8f0443371a61fc5d30464b3a9dfb4211693 (patch) | |
| tree | 39b25f52769597c133360007e5eadff89dafa9e1 /TAO/tests/Faults | |
| parent | 44f313a104c4a76fa6e83239ec07066df6703355 (diff) | |
| download | ATCD-8085c8f0443371a61fc5d30464b3a9dfb4211693.tar.gz | |
More updates to TAO/tests
Diffstat (limited to 'TAO/tests/Faults')
| -rwxr-xr-x | TAO/tests/Faults/run_test.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/TAO/tests/Faults/run_test.pl b/TAO/tests/Faults/run_test.pl index 9d287351aae..b5da0c8d0d2 100755 --- a/TAO/tests/Faults/run_test.pl +++ b/TAO/tests/Faults/run_test.pl @@ -88,7 +88,7 @@ print STDERR "===== Client crash (abort) during upcall\n"; $CL->Arguments ("-k file://$client_iorfile -i 100 -s"); -$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval()); +$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval(), {self_crash => 1}); if ($client_status == -1) { print STDERR "ERROR: client returned $client_status\n"; @@ -122,7 +122,7 @@ if ($client_status != 0) { exit 1; } -$server_status = $SV->WaitKill ($server->ProcessStopWaitInterval()); +$server_status = $SV->WaitKill ($server->ProcessStopWaitInterval(), {self_crash => 1}); if ($server_status == -1) { print STDERR "ERROR: server returned $server_status\n"; @@ -245,7 +245,7 @@ if ($client->PutFile ($midiorbase) == -1) { $CL->Arguments ("-k file://$client_midiorfile -i 100 -s"); -$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval() + 85); +$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval() + 85, {self_crash => 1}); if ($client_status == -1) { print STDERR "ERROR: client returned $client_status\n"; @@ -335,7 +335,7 @@ print STDERR "===== Client crash (abort) during upcall\n"; $CL->Arguments ("-k file://$client_iorfile -i 100 -s"); -$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval()); +$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval(), {self_crash => 1}); if ($client_status == -1) { print STDERR "ERROR: client returned $client_status\n"; @@ -369,7 +369,7 @@ if ($client_status != 0) { exit 1; } -$server_status = $SV->WaitKill ($server->ProcessStopWaitInterval()); +$server_status = $SV->WaitKill ($server->ProcessStopWaitInterval(), {self_crash => 1}); if ($server_status == -1) { print STDERR "ERROR: server returned $server_status\n"; @@ -488,7 +488,7 @@ if ($client->PutFile ($midiorbase) == -1) { $CL->Arguments ("-k file://$client_midiorfile -i 100 -s"); -$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval() + 85); +$client_status = $CL->SpawnWaitKill ($client->ProcessStartWaitInterval() + 85, {self_crash => 1}); if ($client_status == -1) { print STDERR "ERROR: client returned $client_status\n"; |