diff options
Diffstat (limited to 'TAO/tests/Bug_1361_Regression/run_test.pl')
-rwxr-xr-x | TAO/tests/Bug_1361_Regression/run_test.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/TAO/tests/Bug_1361_Regression/run_test.pl b/TAO/tests/Bug_1361_Regression/run_test.pl index b77fb73e0b7..b0fc78cea19 100755 --- a/TAO/tests/Bug_1361_Regression/run_test.pl +++ b/TAO/tests/Bug_1361_Regression/run_test.pl @@ -36,6 +36,11 @@ local $max_running_time = 360; local $elapsed = time() - $start_time; my $p = $SV->{'PROCESS'}; +if ($ARGV[0] eq '-quick') { + $elapsed = 0; + $max_running_time = 1; +} + while (($elapsed < $max_running_time) ) { # Start all clients in parallel |