diff options
| -rw-r--r-- | ChangeLog-99b | 5 | ||||
| -rw-r--r-- | TAO/ChangeLog-99c | 44 | ||||
| -rwxr-xr-x | bin/tao_env.pl | 17 |
3 files changed, 65 insertions, 1 deletions
diff --git a/ChangeLog-99b b/ChangeLog-99b index 7360f8eebf6..443edd6c1d7 100644 --- a/ChangeLog-99b +++ b/ChangeLog-99b @@ -1,3 +1,8 @@ +Sat Jan 9 22:05:07 1999 Nanbor Wang <nanbor@cs.wustl.edu> + + * bin/tao_env.pl: A new perl script that help you translate _env + to TAO_IN_ENV. + Sat Jan 09 10:53:37 1999 David L. Levine <levine@cs.wustl.edu> * ace/Name_Proxy.cpp (open): swapped branches of conditional diff --git a/TAO/ChangeLog-99c b/TAO/ChangeLog-99c index 09f76eb0548..8deb631dcda 100644 --- a/TAO/ChangeLog-99c +++ b/TAO/ChangeLog-99c @@ -1,4 +1,46 @@ -Sat Jan 9 18:53:47 1999 Nanbor Wang <nanbor@cs.wustl.edu> +Sat Jan 9 22:06:09 1999 Nanbor Wang <nanbor@cs.wustl.edu> + + * Any.h: + * CDR.h: + * Connect.h: + * CurrentC.h: + * CurrentS.cpp: + * DynAnyS.cpp: + * DynAny_i.cpp: + * DynArray_i.cpp: + * DynEnum_i.cpp: + * DynSequence_i.cpp: + * DynStruct_i.cpp: + * DynUnion_i.cpp: + * Exception.h: + * Forwarding_Servant.h: + * GIOP.h: + * IIOP_Interpreter.h: + * IIOP_ORB.h: + * IIOP_Object.h: + * Invocation.h: + * Marshal.h: + * NVList.h: + * ORB.cpp: + * ORB.h: + * Object.h: + * POA.h: + * POAC.h: + * POAS.cpp: + * POAS.h: + * POA_CORBA.h: + * PolicyC.h: + * PolicyS.cpp: + * Sequence.h: + * Sequence_T.h: + * Servant_Base.h: + * Server_Request.h: + * Stub.h: + * TAO.h: + * Typecode.h: + * corba.h: + * poa_T.h: + * varout.h: Replaced all occurances of <_env> to TAO_IN_ENV. * orbsvcs/orbsvcs/CosEvent/ProxyPushConsumer_i.cpp (connect_push_supplier): Changed to use TAO_IN_ENV. diff --git a/bin/tao_env.pl b/bin/tao_env.pl new file mode 100755 index 00000000000..0ac889ef308 --- /dev/null +++ b/bin/tao_env.pl @@ -0,0 +1,17 @@ +eval '(exit $?0)' && eval 'exec perl -pi -S $0 ${1+"$@"}' + & eval 'exec perl -pi -S $0 $argv:q' + if 0; + +# $Id$ +# +# You may want to run the "find" command with this script, which maybe +# something like this: +# +# find . -type f \( -name "*.i" -o -name "*.h" -o -name "*.C" -o -name "*.cc" -o -name "*.c" -o -name "*.cpp" -o -name "*.hpp" -o -name "*.ipp" \) -print | xargs $ACE_ROOT/bin/auto_ptr.perl + +# The first three lines above let this script run without specifying the +# full path to perl, as long as it is in the user's PATH. +# Taken from perlrun man page. + +s/^_env/TAO_IN_ENV/; +s/([^_A-Za-z])_env/$1TAO_IN_ENV/g; |