197 lines
5.3 KiB
C++
197 lines
5.3 KiB
C++
|
|
// (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 */
|