开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数值算法/人工智能 > 生物技术 > 查看源码
choice.cpp
资源名称：ncbi_cxx_win--Jul_08_2004.zip　[点击查看]
上传用户：yhdzpy8989
上传日期：2007-06-13
资源大小：13604k
文件大小：20k
源码类别：

生物技术

开发平台：

C/C++

choice.cpp：源码内容
  1. /*
  2.  * ===========================================================================
  3.  * PRODUCTION $Log: choice.cpp,v $
  4.  * PRODUCTION Revision 1000.2  2004/06/01 19:39:50  gouriano
  5.  * PRODUCTION PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.38
  6.  * PRODUCTION
  7.  * ===========================================================================
  8.  */
  10. /*  $Id: choice.cpp,v 1000.2 2004/06/01 19:39:50 gouriano Exp $
  11. * ===========================================================================
  12. *
  13. *                            PUBLIC DOMAIN NOTICE
  14. *               National Center for Biotechnology Information
  15. *
  16. *  This software/database is a "United States Government Work" under the
  17. *  terms of the United States Copyright Act.  It was written as part of
  18. *  the author's official duties as a United States Government employee and
  19. *  thus cannot be copyrighted.  This software/database is freely available
  20. *  to the public for use. The National Library of Medicine and the U.S.
  21. *  Government have not placed any restriction on its use or reproduction.
  22. *
  23. *  Although all reasonable efforts have been taken to ensure the accuracy
  24. *  and reliability of the software and data, the NLM and the U.S.
  25. *  Government do not and cannot warrant the performance or results that
  26. *  may be obtained by using this software or data. The NLM and the U.S.
  27. *  Government disclaim all warranties, express or implied, including
  28. *  warranties of performance, merchantability or fitness for any particular
  29. *  purpose.
  30. *
  31. *  Please cite the author in any work or product based on this material.
  32. *
  33. * ===========================================================================
  34. *
  35. * Author: Eugene Vasilchenko
  36. *
  37. * File Description:
  38. *   !!! PUT YOUR DESCRIPTION HERE !!!
  39. *
  40. * ---------------------------------------------------------------------------
  41. * $Log: choice.cpp,v $
  42. * Revision 1000.2  2004/06/01 19:39:50  gouriano
  43. * PRODUCTION: UPGRADED [GCC34_MSVC7] Dev-tree R1.38
  44. *
  45. * Revision 1.38  2004/05/17 21:03:02  gorelenk
  46. * Added include of PCH ncbi_pch.hpp
  47. *
  48. * Revision 1.37  2004/03/25 15:57:08  gouriano
  49. * Added possibility to copy and compare serial object non-recursively
  50. *
  51. * Revision 1.36  2004/01/05 14:25:19  gouriano
  52. * Added possibility to set serialization hooks by stack path
  53. *
  54. * Revision 1.35  2003/05/16 18:02:18  gouriano
  55. * revised exception error messages
  56. *
  57. * Revision 1.34  2003/04/29 18:30:36  gouriano
  58. * object data member initialization verification
  59. *
  60. * Revision 1.33  2002/12/26 19:32:32  gouriano
  61. * changed XML I/O streams to properly handle object copying
  62. *
  63. * Revision 1.32  2002/12/12 21:08:07  gouriano
  64. * implemented handling of complex XML containers
  65. *
  66. * Revision 1.31  2002/11/14 20:55:47  gouriano
  67. * added support of XML attribute lists
  68. *
  69. * Revision 1.30  2002/10/25 14:49:27  vasilche
  70. * NCBI C Toolkit compatibility code extracted to libxcser library.
  71. * Serial streams flags names were renamed to fXxx.
  72. *
  73. * Names of flags
  74. *
  75. * Revision 1.29  2002/05/22 14:03:42  grichenk
  76. * CSerialUserOp -- added prefix UserOp_ to Assign() and Equals()
  77. *
  78. * Revision 1.28  2001/07/25 19:13:04  grichenk
  79. * Check if the object is CObject-derived before dynamic cast
  80. *
  81. * Revision 1.27  2001/07/16 16:22:51  grichenk
  82. * Added CSerialUserOp class to create Assign() and Equals() methods for
  83. * user-defind classes.
  84. * Added SerialAssign<>() and SerialEquals<>() functions.
  85. *
  86. * Revision 1.26  2001/05/17 15:07:04  lavr
  87. * Typos corrected
  88. *
  89. * Revision 1.25  2001/01/05 20:10:50  vasilche
  90. * CByteSource, CIStrBuffer, COStrBuffer, CLightString, CChecksum, CWeakMap
  91. * were moved to util.
  92. *
  93. * Revision 1.24  2000/10/20 15:51:37  vasilche
  94. * Fixed data error processing.
  95. * Added interface for constructing container objects directly into output stream.
  96. * object.hpp, object.inl and object.cpp were split to
  97. * objectinfo.*, objecttype.*, objectiter.* and objectio.*.
  98. *
  99. * Revision 1.23  2000/10/13 20:22:53  vasilche
  100. * Fixed warnings on 64 bit compilers.
  101. * Fixed missing typename in templates.
  102. *
  103. * Revision 1.22  2000/09/26 17:38:20  vasilche
  104. * Fixed incomplete choiceptr implementation.
  105. * Removed temporary comments.
  106. *
  107. * Revision 1.21  2000/09/18 20:00:20  vasilche
  108. * Separated CVariantInfo and CMemberInfo.
  109. * Implemented copy hooks.
  110. * All hooks now are stored in CTypeInfo/CMemberInfo/CVariantInfo.
  111. * Most type specific functions now are implemented via function pointers instead of virtual functions.
  112. *
  113. * Revision 1.20  2000/09/01 13:16:14  vasilche
  114. * Implemented class/container/choice iterators.
  115. * Implemented CObjectStreamCopier for copying data without loading into memory.
  116. *
  117. * Revision 1.19  2000/08/15 19:44:46  vasilche
  118. * Added Read/Write hooks:
  119. * CReadObjectHook/CWriteObjectHook for objects of specified type.
  120. * CReadClassMemberHook/CWriteClassMemberHook for specified members.
  121. * CReadChoiceVariantHook/CWriteChoiceVariant for specified choice variants.
  122. * CReadContainerElementHook/CWriteContainerElementsHook for containers.
  123. *
  124. * Revision 1.18  2000/07/03 18:42:42  vasilche
  125. * Added interface to typeinfo via CObjectInfo and CConstObjectInfo.
  126. * Reduced header dependency.
  127. *
  128. * Revision 1.17  2000/06/16 16:31:17  vasilche
  129. * Changed implementation of choices and classes info to allow use of the same classes in generated and user written classes.
  130. *
  131. * Revision 1.16  2000/06/07 19:45:57  vasilche
  132. * Some code cleaning.
  133. * Macros renaming in more clear way.
  134. * BEGIN_NAMED_*_INFO, ADD_*_MEMBER, ADD_NAMED_*_MEMBER.
  135. *
  136. * Revision 1.15  2000/06/01 19:07:02  vasilche
  137. * Added parsing of XML data.
  138. *
  139. * Revision 1.14  2000/05/24 20:08:46  vasilche
  140. * Implemented XML dump.
  141. *
  142. * Revision 1.13  2000/05/09 16:38:37  vasilche
  143. * CObject::GetTypeInfo now moved to CObjectGetTypeInfo::GetTypeInfo to reduce possible errors.
  144. * Added write context to CObjectOStream.
  145. * Inlined most of methods of helping class Member, Block, ByteBlock etc.
  146. *
  147. * Revision 1.12  2000/04/28 16:58:12  vasilche
  148. * Added classes CByteSource and CByteSourceReader for generic reading.
  149. * Added delayed reading of choice variants.
  150. *
  151. * Revision 1.11  2000/04/10 21:01:48  vasilche
  152. * Fixed Erase for map/set.
  153. * Added iteratorbase.hpp header for basic internal classes.
  154. *
  155. * Revision 1.10  2000/04/06 16:10:58  vasilche
  156. * Fixed bug with iterators in choices.
  157. * Removed unneeded calls to ReadExternalObject/WriteExternalObject.
  158. * Added output buffering to text ASN.1 data.
  159. *
  160. * Revision 1.9  2000/04/03 18:47:26  vasilche
  161. * Added main include file for generated headers.
  162. * serialimpl.hpp is included in generated sources with GetTypeInfo methods
  163. *
  164. * Revision 1.8  2000/03/14 14:42:29  vasilche
  165. * Fixed error reporting.
  166. *
  167. * Revision 1.7  2000/03/07 14:06:21  vasilche
  168. * Added stream buffering to ASN.1 binary input.
  169. * Optimized class loading/storing.
  170. * Fixed bugs in processing OPTIONAL fields.
  171. * Added generation of reference counted objects.
  172. *
  173. * Revision 1.6  2000/02/17 20:02:42  vasilche
  174. * Added some standard serialization exceptions.
  175. * Optimized text/binary ASN.1 reading.
  176. * Fixed wrong encoding of StringStore in ASN.1 binary format.
  177. * Optimized logic of object collection.
  178. *
  179. * Revision 1.5  2000/02/01 21:47:21  vasilche
  180. * Added CGeneratedChoiceTypeInfo for generated choice classes.
  181. * Added buffering to CObjectIStreamAsn.
  182. * Removed CMemberInfo subclasses.
  183. * Added support for DEFAULT/OPTIONAL members.
  184. *
  185. * Revision 1.4  2000/01/10 19:46:38  vasilche
  186. * Fixed encoding/decoding of REAL type.
  187. * Fixed encoding/decoding of StringStore.
  188. * Fixed encoding/decoding of NULL type.
  189. * Fixed error reporting.
  190. * Reduced object map (only classes).
  191. *
  192. * Revision 1.3  2000/01/05 19:43:51  vasilche
  193. * Fixed error messages when reading from ASN.1 binary file.
  194. * Fixed storing of integers with enumerated values in ASN.1 binary file.
  195. * Added TAG support to key/value of map.
  196. * Added support of NULL variant in CHOICE.
  197. *
  198. * Revision 1.2  1999/12/17 19:05:01  vasilche
  199. * Simplified generation of GetTypeInfo methods.
  200. *
  201. * Revision 1.1  1999/09/24 18:20:07  vasilche
  202. * Removed dependency on NCBI toolkit.
  203. *
  204. * 
  205. * ===========================================================================
  206. */
  208. #include <ncbi_pch.hpp>
  209. #include <serial/choice.hpp>
  210. #include <serial/objostr.hpp>
  211. #include <serial/objistr.hpp>
  212. #include <serial/objcopy.hpp>
  213. #include <serial/variant.hpp>
  214. #include <serial/delaybuf.hpp>
  215. #include <serial/serialbase.hpp>
  217. BEGIN_NCBI_SCOPE
  219. class CChoiceTypeInfoFunctions
  220. {
  221. public:
  222.     static void ReadChoiceDefault(CObjectIStream& in,
  223.                                   TTypeInfo objectType,
  224.                                   TObjectPtr objectPtr);
  225.     static void WriteChoiceDefault(CObjectOStream& out,
  226.                                    TTypeInfo objectType,
  227.                                    TConstObjectPtr objectPtr);
  228.     static void SkipChoiceDefault(CObjectIStream& in,
  229.                                   TTypeInfo objectType);
  230.     static void CopyChoiceDefault(CObjectStreamCopier& copier,
  231.                                   TTypeInfo objectType);
  232. };
  234. typedef CChoiceTypeInfoFunctions TFunc;
  236. CChoiceTypeInfo::CChoiceTypeInfo(size_t size, const char* name, 
  237.                                  const void* nonCObject,
  238.                                  TTypeCreate createFunc,
  239.                                  const type_info& ti,
  240.                                  TWhichFunction whichFunc,
  241.                                  TSelectFunction selectFunc,
  242.                                  TResetFunction resetFunc)
  243.     : CParent(eTypeFamilyChoice, size, name, nonCObject, createFunc, ti),
  244.       m_WhichFunction(whichFunc),
  245.       m_ResetFunction(resetFunc), m_SelectFunction(selectFunc)
  246. {
  247.     InitChoiceTypeInfoFunctions();
  248. }
  250. CChoiceTypeInfo::CChoiceTypeInfo(size_t size, const char* name,
  251.                                  const CObject* cObject,
  252.                                  TTypeCreate createFunc,
  253.                                  const type_info& ti,
  254.                                  TWhichFunction whichFunc,
  255.                                  TSelectFunction selectFunc,
  256.                                  TResetFunction resetFunc)
  257.     : CParent(eTypeFamilyChoice, size, name, cObject, createFunc, ti),
  258.       m_WhichFunction(whichFunc),
  259.       m_ResetFunction(resetFunc), m_SelectFunction(selectFunc)
  260. {
  261.     InitChoiceTypeInfoFunctions();
  262. }
  264. CChoiceTypeInfo::CChoiceTypeInfo(size_t size, const string& name, 
  265.                                  const void* nonCObject,
  266.                                  TTypeCreate createFunc,
  267.                                  const type_info& ti,
  268.                                  TWhichFunction whichFunc,
  269.                                  TSelectFunction selectFunc,
  270.                                  TResetFunction resetFunc)
  271.     : CParent(eTypeFamilyChoice, size, name, nonCObject, createFunc, ti),
  272.       m_WhichFunction(whichFunc),
  273.       m_ResetFunction(resetFunc), m_SelectFunction(selectFunc)
  274. {
  275.     InitChoiceTypeInfoFunctions();
  276. }
  278. CChoiceTypeInfo::CChoiceTypeInfo(size_t size, const string& name,
  279.                                  const CObject* cObject,
  280.                                  TTypeCreate createFunc,
  281.                                  const type_info& ti,
  282.                                  TWhichFunction whichFunc,
  283.                                  TSelectFunction selectFunc,
  284.                                  TResetFunction resetFunc)
  285.     : CParent(eTypeFamilyChoice, size, name, cObject, createFunc, ti),
  286.       m_WhichFunction(whichFunc),
  287.       m_ResetFunction(resetFunc), m_SelectFunction(selectFunc)
  288. {
  289.     InitChoiceTypeInfoFunctions();
  290. }
  292. void CChoiceTypeInfo::InitChoiceTypeInfoFunctions(void)
  293. {
  294.     SetReadFunction(&TFunc::ReadChoiceDefault);
  295.     SetWriteFunction(&TFunc::WriteChoiceDefault);
  296.     SetCopyFunction(&TFunc::CopyChoiceDefault);
  297.     SetSkipFunction(&TFunc::SkipChoiceDefault);
  298.     m_SelectDelayFunction = 0;
  299. }
  301. CVariantInfo* CChoiceTypeInfo::AddVariant(const char* memberId,
  302.                                           const void* memberPtr,
  303.                                           const CTypeRef& memberType)
  304. {
  305.     CVariantInfo* variantInfo = new CVariantInfo(this, memberId,
  306.                                                  TPointerOffsetType(memberPtr),
  307.                                                  memberType);
  308.     GetItems().AddItem(variantInfo);
  309.     return variantInfo;
  310. }
  312. CVariantInfo* CChoiceTypeInfo::AddVariant(const CMemberId& memberId,
  313.                                           const void* memberPtr,
  314.                                           const CTypeRef& memberType)
  315. {
  316.     CVariantInfo* variantInfo = new CVariantInfo(this, memberId,
  317.                                                  TPointerOffsetType(memberPtr),
  318.                                                  memberType);
  319.     GetItems().AddItem(variantInfo);
  320.     return variantInfo;
  321. }
  323. bool CChoiceTypeInfo::IsDefault(TConstObjectPtr object) const
  324. {
  325.     return GetIndex(object) == kEmptyChoice;
  326. }
  329. static inline
  330. TObjectPtr GetMember(const CMemberInfo* memberInfo, TObjectPtr object)
  331. {
  332.     if ( memberInfo->CanBeDelayed() )
  333.         memberInfo->GetDelayBuffer(object).Update();
  334.     return memberInfo->GetItemPtr(object);
  335. }
  337. static inline
  338. TConstObjectPtr GetMember(const CMemberInfo* memberInfo,
  339.                           TConstObjectPtr object)
  340. {
  341.     if ( memberInfo->CanBeDelayed() )
  342.         const_cast<CDelayBuffer&>(memberInfo->GetDelayBuffer(object)).Update();
  343.     return memberInfo->GetItemPtr(object);
  344. }
  346. bool CChoiceTypeInfo::Equals(TConstObjectPtr object1, TConstObjectPtr object2,
  347.                              ESerialRecursionMode how) const
  348. {
  349.     // User defined comparison
  350.     if ( IsCObject() ) {
  351.         const CSerialUserOp* op1 =
  352.             dynamic_cast<const CSerialUserOp*>
  353.             (static_cast<const CObject*>(object1));
  354.         const CSerialUserOp* op2 =
  355.             dynamic_cast<const CSerialUserOp*>
  356.             (static_cast<const CObject*>(object2));
  357.         if ( op1  &&  op2 ) {
  358.             if ( !op1->UserOp_Equals(*op2) )
  359.                 return false;
  360.         }
  361.     }
  363.     TMemberIndex index;
  365.     index = GetVariants().FirstIndex();
  366.     const CVariantInfo* variantInfo = GetVariantInfo(index);
  367.     if (variantInfo->GetId().IsAttlist()) {
  368.         const CMemberInfo* info =
  369.             dynamic_cast<const CMemberInfo*>(GetVariants().GetItemInfo(index));
  370.         if ( !info->GetTypeInfo()->Equals(GetMember(info, object1),
  371.                                           GetMember(info, object2), how) ) {
  372.             return false;
  373.         }
  374.     }
  376.     // Default comparison
  377.     index = GetIndex(object1);
  378.     if ( index != GetIndex(object2) )
  379.         return false;
  380.     if ( index == kEmptyChoice )
  381.         return true;
  382.     return
  383.         GetVariantInfo(index)->GetTypeInfo()->Equals(GetData(object1, index),
  384.                                                      GetData(object2, index), how);
  385. }
  387. void CChoiceTypeInfo::SetDefault(TObjectPtr dst) const
  388. {
  389.     ResetIndex(dst);
  390. }
  392. void CChoiceTypeInfo::Assign(TObjectPtr dst, TConstObjectPtr src,
  393.                              ESerialRecursionMode how) const
  394. {
  395.     TMemberIndex index;
  397.     index = GetVariants().FirstIndex();
  398.     const CVariantInfo* variantInfo = GetVariantInfo(index);
  399.     if (variantInfo->GetId().IsAttlist()) {
  400.         const CMemberInfo* info =
  401.             dynamic_cast<const CMemberInfo*>(GetVariants().GetItemInfo(index));
  402.         info->GetTypeInfo()->Assign(GetMember(info, dst),
  403.                                     GetMember(info, src),how);
  404.     }
  406.     index = GetIndex(src);
  407.     if ( index == kEmptyChoice )
  408.         ResetIndex(dst);
  409.     else {
  410.         _ASSERT(index >= GetVariants().FirstIndex() && 
  411.                 index <= GetVariants().LastIndex());
  412.         SetIndex(dst, index);
  413.         GetVariantInfo(index)->GetTypeInfo()->Assign(GetData(dst, index),
  414.                                                      GetData(src, index), how);
  415.     }
  417.     // User defined assignment
  418.     if ( IsCObject() ) {
  419.         const CSerialUserOp* opsrc =
  420.             dynamic_cast<const CSerialUserOp*>
  421.             (static_cast<const CObject*>(src));
  422.         CSerialUserOp* opdst =
  423.             dynamic_cast<CSerialUserOp*>
  424.             (static_cast<CObject*>(dst));
  425.         if ( opdst  &&  opsrc ) {
  426.             opdst->UserOp_Assign(*opsrc);
  427.         }
  428.     }
  429. }
  431. void CChoiceTypeInfo::SetSelectDelayFunction(TSelectDelayFunction func)
  432. {
  433.     _ASSERT(m_SelectDelayFunction == 0);
  434.     _ASSERT(func != 0);
  435.     m_SelectDelayFunction = func;
  436. }
  438. void CChoiceTypeInfo::SetDelayIndex(TObjectPtr objectPtr,
  439.                                     TMemberIndex index) const
  440. {
  441.     m_SelectDelayFunction(this, objectPtr, index);
  442. }
  444. void CChoiceTypeInfoFunctions::ReadChoiceDefault(CObjectIStream& in,
  445.                                                  TTypeInfo objectType,
  446.                                                  TObjectPtr objectPtr)
  447. {
  448.     const CChoiceTypeInfo* choiceType =
  449.         CTypeConverter<CChoiceTypeInfo>::SafeCast(objectType);
  451.     BEGIN_OBJECT_FRAME_OF2(in, eFrameChoice, choiceType);
  452.     in.BeginChoice(choiceType);
  453.     BEGIN_OBJECT_FRAME_OF(in, eFrameChoiceVariant);
  454.     TMemberIndex index = in.BeginChoiceVariant(choiceType);
  455.     if ( index == kInvalidMember )
  456.         in.ThrowError(in.fFormatError, "choice variant id expected");
  457.     const CVariantInfo* variantInfo = choiceType->GetVariantInfo(index);
  458.     if (variantInfo->GetId().IsAttlist()) {
  459.         const CMemberInfo* memberInfo =
  460.             dynamic_cast<const CMemberInfo*>(
  461.                 choiceType->GetVariants().GetItemInfo(index));
  462.         memberInfo->ReadMember(in,objectPtr);
  463.         index = in.BeginChoiceVariant(choiceType);
  464.         if ( index == kInvalidMember )
  465.             in.ThrowError(in.fFormatError, "choice variant id expected");
  466.         variantInfo = choiceType->GetVariantInfo(index);
  467.     }
  468.     in.SetTopMemberId(variantInfo->GetId());
  470.     variantInfo->ReadVariant(in, objectPtr);
  472.     in.EndChoiceVariant();
  473.     END_OBJECT_FRAME_OF(in);
  474.     in.EndChoice();
  475.     END_OBJECT_FRAME_OF(in);
  476. }
  478. void CChoiceTypeInfoFunctions::WriteChoiceDefault(CObjectOStream& out,
  479.                                                   TTypeInfo objectType,
  480.                                                   TConstObjectPtr objectPtr)
  481. {
  482.     const CChoiceTypeInfo* choiceType =
  483.         CTypeConverter<CChoiceTypeInfo>::SafeCast(objectType);
  485.     BEGIN_OBJECT_FRAME_OF2(out, eFrameChoice, choiceType);
  486.     out.BeginChoice(choiceType);
  487.     TMemberIndex index = choiceType->GetVariants().FirstIndex();
  488.     const CVariantInfo* variantInfo = choiceType->GetVariantInfo(index);
  489.     if (variantInfo->GetId().IsAttlist()) {
  490.         const CMemberInfo* memberInfo =
  491.             dynamic_cast<const CMemberInfo*>(
  492.                 choiceType->GetVariants().GetItemInfo(index));
  493.         memberInfo->WriteMember(out,objectPtr);
  494.     }
  496.     index = choiceType->GetIndex(objectPtr);
  497.     if ( index == kInvalidMember )
  498.         out.ThrowError(out.fIllegalCall, "cannot write empty choice");
  500.     variantInfo = choiceType->GetVariantInfo(index);
  501.     BEGIN_OBJECT_FRAME_OF2(out, eFrameChoiceVariant, variantInfo->GetId());
  502.     out.BeginChoiceVariant(choiceType, variantInfo->GetId());
  504.     variantInfo->WriteVariant(out, objectPtr);
  506.     out.EndChoiceVariant();
  507.     END_OBJECT_FRAME_OF(out);
  508.     out.EndChoice();
  509.     END_OBJECT_FRAME_OF(out);
  510. }
  512. void CChoiceTypeInfoFunctions::CopyChoiceDefault(CObjectStreamCopier& copier,
  513.                                                  TTypeInfo objectType)
  514. {
  515.     copier.CopyChoice(CTypeConverter<CChoiceTypeInfo>::SafeCast(objectType));
  516. }
  518. void CChoiceTypeInfoFunctions::SkipChoiceDefault(CObjectIStream& in,
  519.                                                  TTypeInfo objectType)
  520. {
  521.     const CChoiceTypeInfo* choiceType =
  522.         CTypeConverter<CChoiceTypeInfo>::SafeCast(objectType);
  524.     BEGIN_OBJECT_FRAME_OF2(in, eFrameChoice, choiceType);
  525.     in.BeginChoice(choiceType);
  526.     BEGIN_OBJECT_FRAME_OF(in, eFrameChoiceVariant);
  527.     TMemberIndex index = in.BeginChoiceVariant(choiceType);
  528.     if ( index == kInvalidMember )
  529.         in.ThrowError(in.fFormatError,"choice variant id expected");
  530.     const CVariantInfo* variantInfo = choiceType->GetVariantInfo(index);
  531.     if (variantInfo->GetId().IsAttlist()) {
  532.         const CMemberInfo* memberInfo =
  533.             dynamic_cast<const CMemberInfo*>(
  534.                 choiceType->GetVariants().GetItemInfo(index));
  535.         memberInfo->SkipMember(in);
  536.         index = in.BeginChoiceVariant(choiceType);
  537.         if ( index == kInvalidMember )
  538.             in.ThrowError(in.fFormatError,"choice variant id expected");
  539.         variantInfo = choiceType->GetVariantInfo(index);
  540.     }
  542.     in.SetTopMemberId(variantInfo->GetId());
  544.     variantInfo->SkipVariant(in);
  546.     in.EndChoiceVariant();
  547.     END_OBJECT_FRAME_OF(in);
  548.     in.EndChoice();
  549.     END_OBJECT_FRAME_OF(in);
  550. }
  552. END_NCBI_SCOPE