diff options
Diffstat (limited to 'TAO/examples/POA/RootPOA/RootPOA.cpp')
-rw-r--r-- | TAO/examples/POA/RootPOA/RootPOA.cpp | 72 |
1 files changed, 0 insertions, 72 deletions
diff --git a/TAO/examples/POA/RootPOA/RootPOA.cpp b/TAO/examples/POA/RootPOA/RootPOA.cpp deleted file mode 100644 index f2a5382636d..00000000000 --- a/TAO/examples/POA/RootPOA/RootPOA.cpp +++ /dev/null @@ -1,72 +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) -{ - ACE_DECLARE_NEW_CORBA_ENV; - - ACE_TRY - { - // Initilize the ORB - 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", ACE_TRY_ENV); - ACE_TRY_CHECK; - - // 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; -} |