diff options
author | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-08-13 14:20:54 +0000 |
---|---|---|
committer | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-08-13 14:20:54 +0000 |
commit | 06d695647eed08b7e78b6c560bd2c6eaa2420ed9 (patch) | |
tree | ad7cc4a9bbd541c2695b4dd7396c1fc790c947af /TAO/tests/Param_Test/run_test.pl | |
parent | 456a2b285ecc766606b53677ac21f07e46eb071e (diff) | |
download | ATCD-06d695647eed08b7e78b6c560bd2c6eaa2420ed9.tar.gz |
ChangeLogTag:Thu Aug 13 09:14:12 1998 Carlos O'Ryan <coryan@cs.wustl.edu>
Diffstat (limited to 'TAO/tests/Param_Test/run_test.pl')
-rwxr-xr-x | TAO/tests/Param_Test/run_test.pl | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/TAO/tests/Param_Test/run_test.pl b/TAO/tests/Param_Test/run_test.pl index b6630ce32c2..55d6e2a5df9 100755 --- a/TAO/tests/Param_Test/run_test.pl +++ b/TAO/tests/Param_Test/run_test.pl @@ -1,4 +1,4 @@ -#$Id$ +# $Id$ # -*- perl -*- eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' & eval 'exec perl -S $0 $argv:q' @@ -90,11 +90,14 @@ for ($i = 0; $i <= $#ARGV; $i++) } } -@types = ("short", "ubstring", "bdstring", "fixed_struct", "strseq", - "bounded_strseq", "var_struct", "nested_struct", "struct_seq", - "bounded_struct_seq", "any", "objref", "objref_sequence", - "any_sequence", "short_sequence", "long_sequence", - "bounded_short_sequence", "bounded_long_sequence", +@types = ("short", "ubstring", "bdstring", "fixed_struct", + "ub_strseq", "bd_strseq", + "var_struct", "nested_struct", + "ub_struct_seq", "bd_struct_seq", + "any", "objref", "objref_sequence", + "any_sequence", + "ub_short_sequence", "ub_long_sequence", + "bd_short_sequence", "bd_long_sequence", "fixed_array", "var_array", "typecode"); if ($type ne "") |