summaryrefslogtreecommitdiff
path: root/TAO/tests/Param_Test/ub_wstring.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/Param_Test/ub_wstring.cpp')
-rw-r--r--TAO/tests/Param_Test/ub_wstring.cpp85
1 files changed, 23 insertions, 62 deletions
diff --git a/TAO/tests/Param_Test/ub_wstring.cpp b/TAO/tests/Param_Test/ub_wstring.cpp
index 73b9f6fde18..8619e87fdd1 100644
--- a/TAO/tests/Param_Test/ub_wstring.cpp
+++ b/TAO/tests/Param_Test/ub_wstring.cpp
@@ -58,7 +58,30 @@ void
Test_Unbounded_WString::dii_req_invoke (CORBA::Request *req,
CORBA::Environment &ACE_TRY_ENV)
{
+ req->add_in_arg ("s1") <<= this->in_;
+ req->add_inout_arg ("s2") <<= this->inout_;
+ req->add_out_arg ("s3") <<= this->out_;
+
+ req->set_return_type (CORBA::_tc_wstring);
+
req->invoke (ACE_TRY_ENV);
+ ACE_CHECK;
+
+ const CORBA::WChar *tmp;
+ req->return_value () >>= tmp;
+ this->ret_ = CORBA::wstring_dup (tmp);
+
+ CORBA::NamedValue_ptr o2 =
+ req->arguments ()->item (1, ACE_TRY_ENV);
+ ACE_CHECK;
+ *o2->value () >>= tmp;
+ this->inout_ = CORBA::wstring_dup (tmp);
+
+ CORBA::NamedValue_ptr o3 =
+ req->arguments ()->item (2, ACE_TRY_ENV);
+ ACE_CHECK;
+ *o3->value () >>= tmp;
+ this->out_ = CORBA::wstring_dup (tmp);
}
int
@@ -123,68 +146,6 @@ Test_Unbounded_WString::run_sii_test (Param_Test_ptr objref,
return -1;
}
-int
-Test_Unbounded_WString::add_args (CORBA::NVList_ptr param_list,
- CORBA::NVList_ptr retval,
- CORBA::Environment &ACE_TRY_ENV)
-{
- ACE_TRY
- {
- // create the parameters
- CORBA::Any in_arg (CORBA::_tc_wstring,
- &this->in_,
- 0);
-
- CORBA::Any inout_arg (CORBA::_tc_wstring,
- &this->inout_,
- 0);
-
- CORBA::Any out_arg (CORBA::_tc_wstring,
- &this->out_,
- 0);
-
- // add parameters
- param_list->add_value ("ws1",
- in_arg,
- CORBA::ARG_IN,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
-
- param_list->add_value ("ws2",
- inout_arg,
- CORBA::ARG_INOUT,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
-
- param_list->add_value ("ws3",
- out_arg,
- CORBA::ARG_OUT,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
-
- // add return value
- CORBA::NamedValue *item = retval->item (0,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
-
- item->value ()->replace (CORBA::_tc_wstring,
- &this->ret_,
- 0, // does not own
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
-
- return 0;
- }
- ACE_CATCHANY
- {
- ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION,
- "Test_Unbounded_WString::add_args\n");
-
- }
- ACE_ENDTRY;
- return -1;
-}
-
CORBA::Boolean
Test_Unbounded_WString::check_validity (void)
{