diff options
Diffstat (limited to 'boost/vmd/detail/tuple.hpp')
-rw-r--r-- | boost/vmd/detail/tuple.hpp | 196 |
1 files changed, 196 insertions, 0 deletions
diff --git a/boost/vmd/detail/tuple.hpp b/boost/vmd/detail/tuple.hpp new file mode 100644 index 0000000000..f8a614c562 --- /dev/null +++ b/boost/vmd/detail/tuple.hpp @@ -0,0 +1,196 @@ + +// (C) Copyright Edward Diener 2011-2015 +// Use, modification and distribution are subject to 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(BOOST_VMD_DETAIL_TUPLE_HPP) +#define BOOST_VMD_DETAIL_TUPLE_HPP + +#include <boost/preprocessor/comparison/equal.hpp> +#include <boost/preprocessor/control/iif.hpp> +#include <boost/preprocessor/punctuation/is_begin_parens.hpp> +#include <boost/preprocessor/tuple/size.hpp> +#include <boost/preprocessor/variadic/elem.hpp> +#include <boost/vmd/empty.hpp> +#include <boost/vmd/is_empty.hpp> +#include <boost/vmd/identity.hpp> +#include <boost/vmd/detail/empty_result.hpp> +#include <boost/vmd/detail/mods.hpp> +#include <boost/vmd/detail/parens.hpp> + +#define BOOST_VMD_DETAIL_TUPLE_BST_CS(vseq) \ + BOOST_PP_EQUAL(BOOST_PP_TUPLE_SIZE(BOOST_VMD_DETAIL_BEGIN_PARENS(vseq)),1) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BST_CS_D(d,vseq) \ + BOOST_PP_EQUAL_D(d,BOOST_PP_TUPLE_SIZE(BOOST_VMD_DETAIL_BEGIN_PARENS(vseq)),1) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BST(vseq) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_BST_CS, \ + BOOST_VMD_IDENTITY(0) \ + ) \ + (vseq) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BST_D(d,vseq) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_BST_CS_D, \ + BOOST_VMD_IDENTITY(0) \ + ) \ + (d,vseq) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BSEQ_NXT(vseq) \ + BOOST_VMD_DETAIL_TUPLE_BST(BOOST_VMD_DETAIL_AFTER_PARENS_DATA(vseq)) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BSEQ_NXT_D(d,vseq) \ + BOOST_VMD_DETAIL_TUPLE_BST_D(d,BOOST_VMD_DETAIL_AFTER_PARENS_DATA(vseq)) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BSEQ(vseq) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BST(vseq), \ + BOOST_VMD_DETAIL_TUPLE_BSEQ_NXT, \ + BOOST_VMD_IDENTITY(0) \ + ) \ + (vseq) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_BSEQ_D(d,vseq) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BST_D(d,vseq), \ + BOOST_VMD_DETAIL_TUPLE_BSEQ_NXT_D, \ + BOOST_VMD_IDENTITY(0) \ + ) \ + (d,vseq) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_SPLIT_CHK_SEQ(vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BSEQ(vseq), \ + BOOST_VMD_DETAIL_EMPTY_RESULT, \ + BOOST_VMD_DETAIL_SPLIT_PARENS \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_SPLIT_CHK_SEQ_D(d,vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BSEQ_D(d,vseq), \ + BOOST_VMD_DETAIL_EMPTY_RESULT, \ + BOOST_VMD_DETAIL_SPLIT_PARENS \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_SPLIT(vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_SPLIT_CHK_SEQ, \ + BOOST_VMD_DETAIL_EMPTY_RESULT \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_SPLIT_D(d,vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_SPLIT_CHK_SEQ_D, \ + BOOST_VMD_DETAIL_EMPTY_RESULT \ + ) \ + (d,vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_PROCESS_CHK_SEQ(vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BSEQ(vseq), \ + BOOST_VMD_EMPTY, \ + BOOST_VMD_DETAIL_BEGIN_PARENS \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_PROCESS_CHK_SEQ_D(d,vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_TUPLE_BSEQ_D(d,vseq), \ + BOOST_VMD_EMPTY, \ + BOOST_VMD_DETAIL_BEGIN_PARENS \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_PROCESS(vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_PROCESS_CHK_SEQ, \ + BOOST_VMD_EMPTY \ + ) \ + (vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_PROCESS_D(d,vseq) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_IS_BEGIN_PARENS(vseq), \ + BOOST_VMD_DETAIL_TUPLE_PROCESS_CHK_SEQ_D, \ + BOOST_VMD_EMPTY \ + ) \ + (d,vseq) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE(...) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER \ + ( \ + BOOST_VMD_DETAIL_NEW_MODS(BOOST_VMD_ALLOW_AFTER,__VA_ARGS__) \ + ), \ + BOOST_VMD_DETAIL_TUPLE_SPLIT, \ + BOOST_VMD_DETAIL_TUPLE_PROCESS \ + ) \ + (BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__)) \ +/**/ + +#define BOOST_VMD_DETAIL_TUPLE_D(d,...) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER \ + ( \ + BOOST_VMD_DETAIL_NEW_MODS(BOOST_VMD_ALLOW_AFTER,__VA_ARGS__) \ + ), \ + BOOST_VMD_DETAIL_TUPLE_SPLIT_D, \ + BOOST_VMD_DETAIL_TUPLE_PROCESS_D \ + ) \ + (d,BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__)) \ +/**/ + +#endif /* BOOST_VMD_DETAIL_TUPLE_HPP */ |