blob: d7ce265f0912f385c87d74d0ce963bddb704f821 (
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
// $Id$
#include "tao/AnyTypeCode/Empty_Param_TypeCode.h"
#ifndef __ACE_INLINE__
# include "tao/AnyTypeCode/Empty_Param_TypeCode.inl"
#endif /* !__ACE_INLINE__ */
TAO_BEGIN_VERSIONED_NAMESPACE_DECL
bool
TAO::TypeCode::Empty_Param::tao_marshal (TAO_OutputCDR &, CORBA::ULong) const
{
// Empty parameter list. Nothing to marshal.
return true;
}
void
TAO::TypeCode::Empty_Param::tao_duplicate (void)
{
// No-op since empty parameter TypeCodes are never created
// dynamically, meaning there is no need to implement reference
// counting.
}
void
TAO::TypeCode::Empty_Param::tao_release (void)
{
// No-op since empty parameter TypeCodes are never created
// dynamically, meaning there is no need to implement reference
// counting.
}
CORBA::Boolean
TAO::TypeCode::Empty_Param::equal_i (CORBA::TypeCode_ptr) const
{
// Equality has already been established in the
// CORBA::TypeCode base class.
return true;
}
CORBA::Boolean
TAO::TypeCode::Empty_Param::equivalent_i (CORBA::TypeCode_ptr tc) const
{
// We could refactor this code to the CORBA::TypeCode::equivalent()
// method but doing so would force us to determine the unaliased
// kind of this TypeCode. Since we already know the unaliased kind
// of this TypeCode, choose to optimize away the additional kind
// unaliasing operation rather than save space.
CORBA::TCKind const tc_kind = TAO::unaliased_kind (tc);
if (tc_kind != this->kind_)
return false;
return true;
}
CORBA::TypeCode_ptr
TAO::TypeCode::Empty_Param::get_compact_typecode_i (void) const
{
// Already compact since parameter list is empty.
// Since empty parameter TypeCodes are never created
// dynamically, there is no need to manipulate a reference count.
static TAO::TypeCode::Empty_Param compact_typecode (this->kind_);
return &compact_typecode;
}
TAO_END_VERSIONED_NAMESPACE_DECL
|
