// (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 */