summaryrefslogtreecommitdiff
path: root/TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp')
-rw-r--r--TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp20
1 files changed, 13 insertions, 7 deletions
diff --git a/TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp b/TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp
index 3d611d2ce86..144855bc048 100644
--- a/TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp
+++ b/TAO/tests/ior_corbaloc/ior_corbaloc_client_i.cpp
@@ -63,8 +63,16 @@ IOR_corbaloc_Client_i::run (CORBA::Environment &ACE_TRY_ENV)
}
// Invoke a request on the server
- factory->print_status (ACE_TRY_ENV);
+ CORBA::Boolean ret_value =
+ factory->print_status (ACE_TRY_ENV);
ACE_TRY_CHECK;
+
+ if (ret_value == 0)
+ {
+ ACE_DEBUG ((LM_DEBUG,
+ "The server has been contacted !!\n",
+ 0));
+ }
}
ACE_CATCH (CosNaming::NamingContext::NotFound, ex)
{
@@ -103,17 +111,15 @@ IOR_corbaloc_Client_i::init (int argc, char **argv)
"" /* the ORB name, it can be anything! */,
ACE_TRY_ENV);
- // There must be at least one argument, the file that has to be
- // retrieved
-
// Get a reference to the Naming Service
CORBA::Object_var naming_context_object =
- orb->string_to_object (argv[1], ACE_TRY_ENV);
+ orb->string_to_object (this->argv_[1],
+ ACE_TRY_ENV);
ACE_TRY_CHECK;
if (CORBA::is_nil (naming_context_object.in ()))
ACE_ERROR_RETURN ((LM_ERROR,
- "Cannot resolve Naming Service\n"),
+ "Cannot resolve Naming Service\n : client"),
1);
// Narrow to get the correct reference
@@ -124,7 +130,7 @@ IOR_corbaloc_Client_i::init (int argc, char **argv)
if (CORBA::is_nil (this->naming_context_.in ()))
ACE_ERROR_RETURN ((LM_ERROR,
- "Cannot narrow Naming Service\n"),
+ "Cannot narrow Naming Service\n :client"),
1);
}
ACE_CATCHANY