diff options
author | Phil Mesnier <mesnier_p@ociweb.com> | 2014-10-20 15:47:51 +0000 |
---|---|---|
committer | Phil Mesnier <mesnier_p@ociweb.com> | 2014-10-20 15:47:51 +0000 |
commit | ddac25b787533d6c66f44851ad37fd9e423a05e3 (patch) | |
tree | 00142a6fc0fd1af67efdf38d43b0927f6983b80d /TAO/orbsvcs/tests/ImplRepo | |
parent | 7e0d477a1c51627f4040c4a01a1c5b6c762ce4db (diff) | |
download | ATCD-ddac25b787533d6c66f44851ad37fd9e423a05e3.tar.gz |
Mon Oct 20 15:37:35 UTC 2014 Phil Mesnier <mesnier_p@ociweb.com>
Diffstat (limited to 'TAO/orbsvcs/tests/ImplRepo')
-rwxr-xr-x | TAO/orbsvcs/tests/ImplRepo/RestartServer/run_test.pl | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/TAO/orbsvcs/tests/ImplRepo/RestartServer/run_test.pl b/TAO/orbsvcs/tests/ImplRepo/RestartServer/run_test.pl index 9d502a77a40..0f1b0335f60 100755 --- a/TAO/orbsvcs/tests/ImplRepo/RestartServer/run_test.pl +++ b/TAO/orbsvcs/tests/ImplRepo/RestartServer/run_test.pl @@ -9,11 +9,15 @@ use PerlACE::TestTarget; $status = 0; $debug_level = '0'; +$mode = "-a NORMAL "; foreach $i (@ARGV) { if ($i eq '-debug') { $debug_level = '10'; } + elsif ($i eq '-manual') { + $mode = "-a MANUAL "; + } } my $extra_timeout = 45; @@ -83,9 +87,11 @@ $ACT = $act->CreateProcess ($imr_activator, "-d 1 ". "-o $act_actiorfile ". "-ORBInitRef ImplRepoService=file://$act_imriorfile"); -$TI = $ti->CreateProcess ($tao_imr, "-ORBInitRef ImplRepoService=file://$ti_imriorfile ". - "add MessengerService ". - "-c \"$srv_server -orbobjrefstyle url -ORBUseIMR 1 -ORBInitRef ImplRepoService=file://$imr_imriorfile\" "); +$TI = $ti->CreateProcess ($tao_imr, + "-ORBInitRef ImplRepoService=file://$ti_imriorfile ". + "add MessengerService ". + $mode . + "-c \"$srv_server -orbobjrefstyle url -ORBUseIMR 1 -ORBInitRef ImplRepoService=file://$imr_imriorfile\" "); |