boostorg/fusion
1
0
Fork 1
mirror of https://github.com/boostorg/fusion.git synced 2025-07-23 17:17:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fusion: more work on adapt_struct_named

Browse Source 
[SVN r59337]
This commit is contained in:
Hartmut Kaiser
2010-01-29 01:58:50 +00:00
parent e7c00c1843
commit 3873f007e8
3 changed files with 56 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
include/boost/fusion/adapted/struct.hpp
View File

@ -10,7 +10,7 @@
#include <boost/fusion/adapted/struct/extension.hpp> #include <boost/fusion/adapted/struct/extension.hpp>
#include <boost/fusion/adapted/struct/adapt_struct.hpp> #include <boost/fusion/adapted/struct/adapt_struct.hpp>
#include <boost/fusion/adapted/struct/adapt_named_struct.hpp> #include <boost/fusion/adapted/struct/adapt_struct_named.hpp>
#include <boost/fusion/adapted/struct/adapt_assoc_struct.hpp> #include <boost/fusion/adapted/struct/adapt_assoc_struct.hpp>
#include <boost/fusion/adapted/struct/struct_iterator.hpp> #include <boost/fusion/adapted/struct/struct_iterator.hpp>

77
include/boost/fusion/adapted/struct/adapt_named_struct.hpp → include/boost/fusion/adapted/struct/adapt_struct_named.hpp
View File

@ -5,8 +5,8 @@
Distributed under the Boost Software License, Version 1.0. (See accompanying Distributed under the Boost Software License, Version 1.0. (See accompanying
file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt) file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
==============================================================================*/ ==============================================================================*/
#if !defined(BOOST_FUSION_NAMED_ADAPT_STRUCT_SEP_29_2009_0748PM) #if !defined(BOOST_FUSION_ADAPT_STRUCT_NAMED_SEP_29_2009_0748PM)
#define BOOST_FUSION_NAMED_ADAPT_STRUCT_SEP_29_2009_0748PM #define BOOST_FUSION_ADAPT_STRUCT_NAMED_SEP_29_2009_0748PM
#include <boost/fusion/support/tag_of_fwd.hpp> #include <boost/fusion/support/tag_of_fwd.hpp>
#include <boost/fusion/adapted/struct/extension.hpp> #include <boost/fusion/adapted/struct/extension.hpp>
@ -31,41 +31,41 @@
#include <boost/preprocessor/cat.hpp> #include <boost/preprocessor/cat.hpp>
#include <boost/mpl/int.hpp> #include <boost/mpl/int.hpp>
#include <boost/config/no_tr1/utility.hpp> #include <boost/config/no_tr1/utility.hpp>
#include <boost/type_traits/is_const.hpp>
#include <boost/type_traits/add_const.hpp>
#define BOOST_FUSION_ADAPT_NAMED_STRUCT(name, newname, bseq) \ #define BOOST_FUSION_ADAPT_STRUCT_NAMED(name, newname, bseq) \
BOOST_FUSION_ADAPT_NAMED_STRUCT_I((())(name)(newname), \ BOOST_FUSION_ADAPT_STRUCT_NAMED_I(name, (boost)(fusion)(adapted), newname, \
BOOST_PP_CAT(BOOST_FUSION_ADAPT_NAMED_STRUCT_X bseq, 0)) \ BOOST_PP_CAT(BOOST_FUSION_ADAPT_STRUCT_NAMED_X bseq, 0)) \
/***/ /***/
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_NS(name, ns, newname, bseq) \ #define BOOST_FUSION_ADAPT_STRUCT_NAMED_NS(name, ns, newname, bseq) \
BOOST_FUSION_ADAPT_NAMED_STRUCT_I((ns)(name)(newname), \ BOOST_FUSION_ADAPT_STRUCT_NAMED_I(name, ns, newname, \
BOOST_PP_CAT(BOOST_FUSION_ADAPT_NAMED_STRUCT_X bseq, 0)) \ BOOST_PP_CAT(BOOST_FUSION_ADAPT_STRUCT_NAMED_X bseq, 0)) \
/***/ /***/
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_X(x, y) ((x, y)) BOOST_FUSION_ADAPT_NAMED_STRUCT_Y #define BOOST_FUSION_ADAPT_STRUCT_NAMED_X(x, y) ((x, y)) BOOST_FUSION_ADAPT_STRUCT_NAMED_Y
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_Y(x, y) ((x, y)) BOOST_FUSION_ADAPT_NAMED_STRUCT_X #define BOOST_FUSION_ADAPT_STRUCT_NAMED_Y(x, y) ((x, y)) BOOST_FUSION_ADAPT_STRUCT_NAMED_X
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_X0 #define BOOST_FUSION_ADAPT_STRUCT_NAMED_X0
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_Y0 #define BOOST_FUSION_ADAPT_STRUCT_NAMED_Y0
// BOOST_FUSION_ADAPT_NAMED_STRUCT_I generates the overarching structure and uses // BOOST_FUSION_ADAPT_STRUCT_NAMED_I generates the overarching structure and uses
// uses SEQ_FOR_EACH_I to generate the "linear" substructures. // uses SEQ_FOR_EACH_I to generate the "linear" substructures.
// Thanks to Paul Mensonides for the PP macro help // Thanks to Paul Mensonides for the PP macro help
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_I(names, seq) \ #define BOOST_FUSION_ADAPT_STRUCT_NAMED_I(name, ns, newname, seq) \
BOOST_PP_SEQ_FOR_EACH( \ BOOST_PP_SEQ_FOR_EACH_R(1, BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_B, _, ns) \
BOOST_FUSION_ADAPT_NAMED_STRUCT_NS_B, _, BOOST_PP_SEQ_ELEM(0, names)) \ struct newname \
struct BOOST_PP_SEQ_ELEM(2, names) \
{ \ { \
BOOST_PP_SEQ_ELEM(2, names)(BOOST_PP_SEQ_ELEM(1, names)& s) \ newname(name& s) : s_(s) {} \
: s_(s) {} \ name& s_; \
BOOST_PP_SEQ_ELEM(1, names)& s_; \
}; \ }; \
BOOST_PP_SEQ_FOR_EACH( \ BOOST_PP_SEQ_FOR_EACH_R(1, BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_E, _, ns) \
BOOST_FUSION_ADAPT_NAMED_STRUCT_NS_E, _, BOOST_PP_SEQ_ELEM(0, names)) \ \
namespace boost { namespace fusion { namespace traits \ namespace boost { namespace fusion { namespace traits \
{ \ { \
template <> \ template <> \
struct tag_of<BOOST_PP_SEQ_ELEM(2, names)> \ struct tag_of<BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname)> \
{ \ { \
typedef struct_tag type; \ typedef struct_tag type; \
}; \ }; \
@ -77,13 +77,13 @@
struct sequence_tag; \ struct sequence_tag; \
\ \
template<> \ template<> \
struct sequence_tag<BOOST_PP_SEQ_ELEM(2, names)> \ struct sequence_tag<BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname)> \
{ \ { \
typedef fusion::fusion_sequence_tag type; \ typedef fusion::fusion_sequence_tag type; \
}; \ }; \
\ \
template<> \ template<> \
struct sequence_tag<BOOST_PP_SEQ_ELEM(2, names) const> \ struct sequence_tag<BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname) const> \
{ \ { \
typedef fusion::fusion_sequence_tag type; \ typedef fusion::fusion_sequence_tag type; \
}; \ }; \
@ -92,23 +92,32 @@
namespace boost { namespace fusion { namespace extension \ namespace boost { namespace fusion { namespace extension \
{ \ { \
template <> \ template <> \
struct struct_size<BOOST_PP_SEQ_ELEM(2, names)> \ struct struct_size<BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname)> \
: mpl::int_<BOOST_PP_SEQ_SIZE(seq)> {}; \ : mpl::int_<BOOST_PP_SEQ_SIZE(seq)> {}; \
BOOST_PP_SEQ_FOR_EACH_I(BOOST_FUSION_ADAPT_NAMED_STRUCT_C, names, seq) \ template <typename T, int N> struct class_member_proxy; \
BOOST_PP_SEQ_FOR_EACH_I(BOOST_FUSION_ADAPT_STRUCT_NAMED_C, \
(BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname), name), seq) \
}}} \ }}} \
/***/ /***/
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_NS_B(r, _, ns) namespace ns { \ #define BOOST_FUSION_ADAPT_STRUCT_NAMED_NAME(ns, newname) \
/***/ BOOST_PP_SEQ_FOR_EACH_R(1, BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_D, _, ns) \
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_NS_E(r, _, ns) } \ newname \
/***/ /***/
#define BOOST_FUSION_ADAPT_NAMED_STRUCT_C(r, names, i, xy) \ #define BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_B(r, _, ns) namespace ns {
#define BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_D(r, _, ns) ns::
#define BOOST_FUSION_ADAPT_STRUCT_NAMED_NS_E(r, _, ns) }
#define BOOST_FUSION_ADAPT_STRUCT_NAMED_C(r, names, i, xy) \
template <> \ template <> \
struct struct_member<BOOST_PP_SEQ_ELEM(1, names), i> \ struct struct_member<BOOST_PP_TUPLE_ELEM(2, 0, names), i> \
{ \ { \
typedef BOOST_PP_TUPLE_ELEM(2, 0, xy) type; \ typedef boost::mpl::if_< \
static type& call(BOOST_PP_SEQ_ELEM(1, names)& struct_) \ boost::is_const<BOOST_PP_TUPLE_ELEM(2, 1, names)> \
, boost::add_const<BOOST_PP_TUPLE_ELEM(2, 0, xy)>::type \
, BOOST_PP_TUPLE_ELEM(2, 0, xy)>::type type; \
static type& call(BOOST_PP_TUPLE_ELEM(2, 0, names)& struct_) \
{ \ { \
return struct_.s_.BOOST_PP_TUPLE_ELEM(2, 1, xy); \ return struct_.s_.BOOST_PP_TUPLE_ELEM(2, 1, xy); \
} \ } \

12
include/boost/fusion/include/adapt_struct_named.hpp Normal file
View File

@ -0,0 +1,12 @@
/*=============================================================================
Copyright (c) 2001-2007 Joel de Guzman
Distributed under the Boost Software License, Version 1.0. (See accompanying
file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
==============================================================================*/
#if !defined(FUSION_INCLUDE_ADAPT_STRUCT_NAMED)
#define FUSION_INCLUDE_ADAPT_STRUCT_NAMED
#include <boost/fusion/adapted/struct/adapt_struct_named.hpp>
#endif