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