diff options
Diffstat (limited to 'TAO/examples/POA/RootPOA/RootPOA.cpp')
-rw-r--r-- | TAO/examples/POA/RootPOA/RootPOA.cpp | 69 |
1 files changed, 0 insertions, 69 deletions
diff --git a/TAO/examples/POA/RootPOA/RootPOA.cpp b/TAO/examples/POA/RootPOA/RootPOA.cpp deleted file mode 100644 index a7a3538466a..00000000000 --- a/TAO/examples/POA/RootPOA/RootPOA.cpp +++ /dev/null @@ -1,69 +0,0 @@ -// $Id$ - -//======================================================================== -// -// = LIBRARY -// TAO/tests/POA/RootPOA -// -// -// = FILENAME -// RootPOA.cpp -// -// = DESCRIPTION -// This program gets the name of the Root POA and prints it out on -// the standard output. -// -// = AUTHOR -// Irfan Pyarali -// -//========================================================================= - -#include "tao/corba.h" - -ACE_RCSID(RootPOA, RootPOA, "$Id$") - -int -main (int argc, char **argv) -{ - // Initilize the ORB - ACE_TRY_NEW_ENV - { - CORBA::ORB_var orb = CORBA::ORB_init (argc, argv, 0, ACE_TRY_ENV); - ACE_TRY_CHECK; - - // Resolve the initial references for the name RootPOA thus getting - // an object of type CORBA::Object. - CORBA::Object_var obj = - orb->resolve_initial_references ("RootPOA"); - - // apply _narrow on the object of type CORBA::Object, to make it a - // POA class Object. - PortableServer::POA_var root_poa = - PortableServer::POA::_narrow (obj.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - // Get the name of the root POA. - CORBA::String_var poa_name = - root_poa->the_name (ACE_TRY_ENV); - ACE_TRY_CHECK; - - ACE_DEBUG ((LM_DEBUG, - "The RootPOA is : %s\n", - poa_name.in ())); - - // Destroy the POA object,also destroys the child POAs if any. - root_poa->destroy (1, - 1, - ACE_TRY_ENV); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ACE_DEBUG ((LM_DEBUG, - "Exceptions raised \n")); - ACE_CHECK_RETURN (-1); - } - ACE_ENDTRY; - -return 0; -} |