summaryrefslogtreecommitdiff
path: root/TAO/tao/TypeCodeFactory/Recursive_TypeCode.inl
blob: 6fa35755fad4191113914818a32f8a5467bf3583 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
// -*- C++ -*-
//
// $Id$

TAO_BEGIN_VERSIONED_NAMESPACE_DECL

ACE_INLINE
TAO::TypeCodeFactory::Recursive_TypeCode::Recursive_TypeCode (char const * id)
  : CORBA::TypeCode (CORBA::TAO_TC_KIND_COUNT)
  , ACE_NESTED_CLASS (TAO, True_RefCount_Policy) ()
  , id_ (id)
  , the_typecode_ ()
{
}

ACE_INLINE void
TAO::TypeCodeFactory::Recursive_TypeCode::the_typecode (CORBA::TypeCode_ptr tc)
{
  this->the_typecode_ = CORBA::TypeCode::_duplicate (tc);

  ACE_DECLARE_NEW_CORBA_ENV;

  // @@ Lazy, I know.  :(
  CORBA::TCKind & mutable_kind =
    const_cast<CORBA::TCKind &> (this->kind_);

  mutable_kind = tc->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
  ACE_CHECK;
}

TAO_END_VERSIONED_NAMESPACE_DECL