summaryrefslogtreecommitdiff
path: root/TAO/tests/Stack_Recursion/run_test.pl
diff options
context:
space:
mode:
authorbala <bala@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-07-25 02:34:56 +0000
committerbala <bala@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-07-25 02:34:56 +0000
commitb9fd3b8e5f466dfbd2d51b8e11f696d260dbfb09 (patch)
tree0c269c603d163fc06b338849fb48abe0abd1a03a /TAO/tests/Stack_Recursion/run_test.pl
parent191d46ad72017df2a8aa0b6d800de8f5b7a417a2 (diff)
downloadATCD-b9fd3b8e5f466dfbd2d51b8e11f696d260dbfb09.tar.gz
ChangeLogTag:Mon Jul 22 17:26:14 2002 Balachandran Natarajan <bala@cs.wustl.edu>
Diffstat (limited to 'TAO/tests/Stack_Recursion/run_test.pl')
-rwxr-xr-xTAO/tests/Stack_Recursion/run_test.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/TAO/tests/Stack_Recursion/run_test.pl b/TAO/tests/Stack_Recursion/run_test.pl
index 6fd3f60728a..e35136b50e0 100755
--- a/TAO/tests/Stack_Recursion/run_test.pl
+++ b/TAO/tests/Stack_Recursion/run_test.pl
@@ -27,7 +27,7 @@ if (PerlACE::waitforfile_timed ($iorfile, 15) == -1) {
$CL->Spawn (60);
-$client = $CL->WaitKill (120);
+$client = $CL->WaitKill (480);
if ($client != 0) {
print STDERR "ERROR: client returned $client1\n";
@@ -42,7 +42,7 @@ if ($server != 0) {
}
@files= <core.*>;
-unlink (@files);
+#unlink (@files);
unlink $iorfile;
exit $status;