TAO/orbsvcs/tests/Bug_1334_Regression/client.cpp

   1 #include "tao/corba.h"
   2
   3 // Attempts to resolve the NameService.
   4 // Returns:
   5 //    0  if the NameService was resolved
   6 //    1  if the NameService could not be resolved
   7 //    2  if something else went wrong
   8 //
   9 int ACE_TMAIN (int argc, ACE_TCHAR *argv[])
  10 {
  11   try
  12     {
  13       CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
  14
  15       try
  16         {
  17            CORBA::Object_var naming =
  18               orb->resolve_initial_references ("NameService");
  19            if (CORBA::is_nil (naming.in ()))
  20              {
  21                 return 1;
  22              }
  23         }
  24       catch (const CORBA::Exception&)
  25         {
  26           return 1;
  27         }
  28     }
  29   catch (const CORBA::Exception&)
  30     {
  31        return 2;
  32     }
  33
  34   return 0;
  35 }