diff options
Diffstat (limited to 'TAO/tests/AMI_Buffering/run_message_count.pl')
-rwxr-xr-x | TAO/tests/AMI_Buffering/run_message_count.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/TAO/tests/AMI_Buffering/run_message_count.pl b/TAO/tests/AMI_Buffering/run_message_count.pl index 8d8f727425b..e25a1eae4fa 100755 --- a/TAO/tests/AMI_Buffering/run_message_count.pl +++ b/TAO/tests/AMI_Buffering/run_message_count.pl @@ -14,7 +14,13 @@ $server_iorfile = PerlACE::LocalFile ("server.ior"); 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 " |