summaryrefslogtreecommitdiff
path: root/TAO/orbsvcs/tests/Simple_Naming
diff options
context:
space:
mode:
authorlevine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-05-21 02:49:03 +0000
committerlevine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-05-21 02:49:03 +0000
commit0e388b72c7c0affd3ecdc7c1511ff62f2ade8e03 (patch)
tree70f8f8d6891899bcc4075d0c62d4650f4371face /TAO/orbsvcs/tests/Simple_Naming
parent7ee61f81f537ffd7f7bf03ee026b4730d08b160f (diff)
downloadATCD-0e388b72c7c0affd3ecdc7c1511ff62f2ade8e03.tar.gz
moved comment line(s) from head of file so that it is not interpreted as a csh file
Diffstat (limited to 'TAO/orbsvcs/tests/Simple_Naming')
-rwxr-xr-xTAO/orbsvcs/tests/Simple_Naming/run_test.pl13
1 files changed, 7 insertions, 6 deletions
diff --git a/TAO/orbsvcs/tests/Simple_Naming/run_test.pl b/TAO/orbsvcs/tests/Simple_Naming/run_test.pl
index e837dfcf91c..1068b4866cd 100755
--- a/TAO/orbsvcs/tests/Simple_Naming/run_test.pl
+++ b/TAO/orbsvcs/tests/Simple_Naming/run_test.pl
@@ -1,9 +1,10 @@
-# $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
@@ -40,10 +41,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;