Commit ac6a35f1 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Increase timeouts in other ParRun statements.

parent 882a3ce3
...@@ -385,7 +385,7 @@ sub GetTickets($$$$) ...@@ -385,7 +385,7 @@ sub GetTickets($$$$)
}; };
print STDERR "Getting all tickets in parallel ...\n"; print STDERR "Getting all tickets in parallel ...\n";
if (ParRun(undef, \@results, $coderef, @resources)) { if (ParRun({'maxwaittime' => 600}, \@results, $coderef, @resources)) {
print STDERR "*** GetTickets: Internal error getting tickets\n"; print STDERR "*** GetTickets: Internal error getting tickets\n";
# #
# Need to be careful here; some of the tickets might have been # Need to be careful here; some of the tickets might have been
...@@ -779,7 +779,7 @@ sub StartSlivers($$$$) ...@@ -779,7 +779,7 @@ sub StartSlivers($$$$)
}; };
print STDERR "Starting all slivers in parallel ...\n"; print STDERR "Starting all slivers in parallel ...\n";
if (ParRun(undef, \@results, $coderef, @resources)) { if (ParRun({'maxwaittime' => 600}, \@results, $coderef, @resources)) {
print STDERR "*** StartSlivers: Internal error starting slivers.\n"; print STDERR "*** StartSlivers: Internal error starting slivers.\n";
return -1; return -1;
} }
...@@ -1095,7 +1095,7 @@ sub DeleteAllSlivers($$) ...@@ -1095,7 +1095,7 @@ sub DeleteAllSlivers($$)
}; };
print STDERR "Deleting all slivers in parallel ...\n"; print STDERR "Deleting all slivers in parallel ...\n";
if (ParRun(undef, \@results, $coderef, @resources)) { if (ParRun({'maxwaittime' => 600}, \@results, $coderef, @resources)) {
print STDERR print STDERR
"*** DeleteAllSlivers: Internal error deleting slivers.\n"; "*** DeleteAllSlivers: Internal error deleting slivers.\n";
# #
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment