diff options
| author | Johnny Willemsen <jwillemsen@remedy.nl> | 2007-11-11 19:16:35 +0000 |
|---|---|---|
| committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2007-11-11 19:16:35 +0000 |
| commit | d573df30c762bd4e1ca742cc0ff7eac4ed4475ff (patch) | |
| tree | a82c6d41548cceec8aa6ac855f8d195a9108eab4 | |
| parent | c0c1bbf57002727c7d5d08a8b8ed3d3a81ca63a7 (diff) | |
| download | ATCD-d573df30c762bd4e1ca742cc0ff7eac4ed4475ff.tar.gz | |
Sun Nov 11 19:15:21 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl>
| -rw-r--r-- | TAO/ChangeLog | 7 | ||||
| -rwxr-xr-x | TAO/tests/IORManipulation/filter/run_test.pl | 4 |
2 files changed, 9 insertions, 2 deletions
diff --git a/TAO/ChangeLog b/TAO/ChangeLog index 2216f056921..afc2870f222 100644 --- a/TAO/ChangeLog +++ b/TAO/ChangeLog @@ -1,6 +1,11 @@ +Sun Nov 11 19:15:21 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl> + + * tests/IORManipulation/filter/run_test.pl: + Added support for VxWorks cross platform testing + Sun Nov 11 19:08:21 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl> - * tests/Bug_809_Regression/run_test.pl: + * tests/Bug_2809_Regression/run_test.pl: Added support for VxWorks cross platform testing Sun Nov 11 19:06:21 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl> diff --git a/TAO/tests/IORManipulation/filter/run_test.pl b/TAO/tests/IORManipulation/filter/run_test.pl index 8b8709e9638..9e4ca4306ce 100755 --- a/TAO/tests/IORManipulation/filter/run_test.pl +++ b/TAO/tests/IORManipulation/filter/run_test.pl @@ -12,6 +12,8 @@ use Sys::Hostname; my $status = 0; my $host = hostname(); +my $host = (PerlACE::is_vxworks_test() ? $ENV{'ACE_RUN_VX_TGTHOST'} : + hostname()); my $class = (PerlACE::is_vxworks_test() ? 'PerlACE::ProcessVX' : 'PerlACE::Process'); my $SV = $class->new('server', @@ -19,7 +21,7 @@ my $SV = $class->new('server', '-ORBEndpoint iiop://localhost ' . "-ORBEndpoint iiop://${host}"); -my $server = $SV->SpawnWaitKill(20); +my $server = $SV->SpawnWaitKill($PerlACE::wait_interval_for_process_creation); if ($server != 0) { print STDERR "ERROR: server returned $server \n"; |