diff options
author | Johnny Willemsen <jwillemsen@remedy.nl> | 2011-06-15 09:28:18 +0000 |
---|---|---|
committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2011-06-15 09:28:18 +0000 |
commit | 478cae8e80d69e238dc548316da45e7e7d3e537c (patch) | |
tree | 82077ebd39b2ca483f168f7b6f24c563b754e7d0 | |
parent | adb2006f8a7e719bd45e8f424d27b94c373406fc (diff) | |
download | ATCD-478cae8e80d69e238dc548316da45e7e7d3e537c.tar.gz |
Try some other ports
-rwxr-xr-x | CIAO/tests/DAnCE/EM-Launch-Failures/run_test.pl | 8 | ||||
-rwxr-xr-x | CIAO/tests/DAnCE/EM-Shutdown-Failures/run_test.pl | 8 |
2 files changed, 8 insertions, 8 deletions
diff --git a/CIAO/tests/DAnCE/EM-Launch-Failures/run_test.pl b/CIAO/tests/DAnCE/EM-Launch-Failures/run_test.pl index 15293b23961..1f1d0b8e218 100755 --- a/CIAO/tests/DAnCE/EM-Launch-Failures/run_test.pl +++ b/CIAO/tests/DAnCE/EM-Launch-Failures/run_test.pl @@ -18,7 +18,7 @@ $ns_running = 0; $app_running = 0; $nr_daemon = 2; -$port_start = 60001; +$port_start = 60010; $iorbase = "NodeApp"; @iorfiles = 0; $nodebase = "Node"; @@ -174,7 +174,7 @@ foreach $file (@files) { print STDERR "Starting Naming Service\n"; my $ns_host = $tg_naming->HostName (); - $NS = $tg_naming->CreateProcess ("$TAO_ROOT/orbsvcs/Naming_Service/tao_cosnaming", "-m 0 -ORBEndpoint iiop://$ns_host:60000 -o $ior_nsfile"); + $NS = $tg_naming->CreateProcess ("$TAO_ROOT/orbsvcs/Naming_Service/tao_cosnaming", "-m 0 -ORBEndpoint iiop://$ns_host:60001 -o $ior_nsfile"); $NS->Spawn (); if ($tg_naming->WaitForFileTimed ($ior_nsbase, @@ -186,8 +186,8 @@ foreach $file (@files) { $ns_running = 1; # Set up NamingService environment - $tg_exe_man->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60000/NameService"); - $tg_executor->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60000/NameService"); + $tg_exe_man->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60001/NameService"); + $tg_executor->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60001/NameService"); # Invoke node daemon(s). print "Invoking $nr_daemon node daemon(s)\n"; diff --git a/CIAO/tests/DAnCE/EM-Shutdown-Failures/run_test.pl b/CIAO/tests/DAnCE/EM-Shutdown-Failures/run_test.pl index eb31e8806ff..696e3ae36b0 100755 --- a/CIAO/tests/DAnCE/EM-Shutdown-Failures/run_test.pl +++ b/CIAO/tests/DAnCE/EM-Shutdown-Failures/run_test.pl @@ -18,7 +18,7 @@ $ns_running = 0; $app_running = 0; $nr_daemon = 2; -$port_start = 60001; +$port_start = 60010; $iorbase = "NodeApp"; @iorfiles = 0; $nodebase = "Node"; @@ -174,7 +174,7 @@ foreach $file (@files) { print STDERR "Starting Naming Service\n"; my $ns_host = $tg_naming->HostName (); - $NS = $tg_naming->CreateProcess ("$TAO_ROOT/orbsvcs/Naming_Service/tao_cosnaming", "-m 0 -ORBEndpoint iiop://$ns_host:60000 -o $ior_nsfile"); + $NS = $tg_naming->CreateProcess ("$TAO_ROOT/orbsvcs/Naming_Service/tao_cosnaming", "-m 0 -ORBEndpoint iiop://$ns_host:60001 -o $ior_nsfile"); $NS->Spawn (); if ($tg_naming->WaitForFileTimed ($ior_nsbase, @@ -186,8 +186,8 @@ foreach $file (@files) { $ns_running = 1; # Set up NamingService environment - $tg_exe_man->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60000/NameService"); - $tg_executor->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60000/NameService"); + $tg_exe_man->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60001/NameService"); + $tg_executor->SetEnv ("NameServiceIOR", "corbaloc:iiop:$ns_host:60001/NameService"); # Invoke node daemon(s). print "Invoking $nr_daemon node daemon(s)\n"; |