diff options
| author | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-05-14 17:31:05 +0000 |
|---|---|---|
| committer | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-05-14 17:31:05 +0000 |
| commit | 58e26d30a2b67aa1e780259467e521ea798268d9 (patch) | |
| tree | 409f9065f46ee408b8b3be2214589e40e6639ba4 /TAO/tao/ValueBase.cpp | |
| parent | b9c36d323129f57abe13fd70dc49dd47d87e11d8 (diff) | |
| download | ATCD-58e26d30a2b67aa1e780259467e521ea798268d9.tar.gz | |
ChangeLogTag:Fri May 14 12:20:38 1999 Carlos O'Ryan <coryan@cs.wustl.edu>
Diffstat (limited to 'TAO/tao/ValueBase.cpp')
| -rw-r--r-- | TAO/tao/ValueBase.cpp | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/TAO/tao/ValueBase.cpp b/TAO/tao/ValueBase.cpp index d42501aa56a..5d17173684b 100644 --- a/TAO/tao/ValueBase.cpp +++ b/TAO/tao/ValueBase.cpp @@ -70,7 +70,8 @@ CORBA_ValueBase::_tao_marshal (TAO_OutputCDR &strm, if (this_ == 0) { - retval = strm.write_ulong (TAO_OBV_GIOP_Flags::Null_ref); + retval = strm.write_ulong (0); + // write TAO_OBV_GIOP_Flags::Null_ref return retval; } @@ -87,8 +88,8 @@ CORBA_ValueBase::_tao_marshal (TAO_OutputCDR &strm, // is provided. The latter is necessary if the formal_type_id // is unequal the 'true derived' type of this object. +++ - CORBA::ULong value_tag = TAO_OBV_GIOP_Flags::Value_tag_base | - TAO_OBV_GIOP_Flags::Type_info_single; + CORBA::ULong value_tag = TAO_OBV_GIOP_Flags::Value_tag_base + | TAO_OBV_GIOP_Flags::Type_info_single; retval = strm.write_ulong (value_tag); if (!retval) @@ -255,5 +256,15 @@ CORBA_DefaultValueRefCountBase::_refcount_value (void) } +// some constants + +const CORBA::ULong TAO_OBV_GIOP_Flags::Value_tag_base = 0x7fffff00L; +const CORBA::ULong TAO_OBV_GIOP_Flags::Value_tag_sigbits = 0xffffff00L; +const CORBA::ULong TAO_OBV_GIOP_Flags::Codebase_url = 1; +const CORBA::ULong TAO_OBV_GIOP_Flags::Type_info_sigbits = 0x00000006L; +const CORBA::ULong TAO_OBV_GIOP_Flags::Type_info_none = 0; +const CORBA::ULong TAO_OBV_GIOP_Flags::Type_info_single = 2; +const CORBA::ULong TAO_OBV_GIOP_Flags::Type_info_list = 6; + #endif /* TAO_HAS_VALUETYPE */ |