diff options
Diffstat (limited to 'TAO/tests/Oneway_Buffering/run_timeout.pl')
-rwxr-xr-x | TAO/tests/Oneway_Buffering/run_timeout.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/TAO/tests/Oneway_Buffering/run_timeout.pl b/TAO/tests/Oneway_Buffering/run_timeout.pl index 4e0c03c8b7b..4f8bbe2fde3 100755 --- a/TAO/tests/Oneway_Buffering/run_timeout.pl +++ b/TAO/tests/Oneway_Buffering/run_timeout.pl @@ -15,7 +15,13 @@ $status = 0; unlink $admin_iorfile; unlink $server_iorfile; -my $AD = new PerlACE::Process ("admin", "-o $admin_iorfile"); +my $AD = 0; +if (PerlACE::is_vxworks_test()) { + $AD = new PerlACE::ProcessVX ("admin", "-o admin.ior"); +} +else { + $AD = new PerlACE::Process ("admin", "-o $admin_iorfile"); +} my $SV = new PerlACE::Process ("server", "-o $server_iorfile"); my $CL = new PerlACE::Process ("client", " -k file://$server_iorfile " |