diff options
Diffstat (limited to 'TAO/orbsvcs/tests/Simple_Naming/run_test.pl')
-rwxr-xr-x | TAO/orbsvcs/tests/Simple_Naming/run_test.pl | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/TAO/orbsvcs/tests/Simple_Naming/run_test.pl b/TAO/orbsvcs/tests/Simple_Naming/run_test.pl index 1068b4866cd..e837dfcf91c 100755 --- a/TAO/orbsvcs/tests/Simple_Naming/run_test.pl +++ b/TAO/orbsvcs/tests/Simple_Naming/run_test.pl @@ -1,10 +1,9 @@ +# $Id$ +# -*- perl -*- eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' & eval 'exec perl -S $0 $argv:q' if 0; -# $Id$ -# -*- perl -*- - # This is a Perl script that runs the client and all the other servers that # are needed @@ -41,10 +40,10 @@ sub client @opts = ("-s", "-t", "-i", "-e", "-y"); @comments = ("Simple Test: \n", - "Tree Test: \n", - "Iterator Test: \n", - "Exceptions Test: \n", - "Destroy Test: \n"); + "Tree Test: \n", + "Iterator Test: \n", + "Exceptions Test: \n", + "Destroy Test: \n"); $test_number = 0; |