237 lines
6.4 KiB
C++
237 lines
6.4 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_SEQ_HPP)
|
|
#define BOOST_VMD_DETAIL_SEQ_HPP
|
|
|
|
#include <boost/preprocessor/comparison/equal.hpp>
|
|
#include <boost/preprocessor/control/iif.hpp>
|
|
#include <boost/preprocessor/control/while.hpp>
|
|
#include <boost/preprocessor/facilities/empty.hpp>
|
|
#include <boost/preprocessor/seq/push_back.hpp>
|
|
#include <boost/preprocessor/tuple/elem.hpp>
|
|
#include <boost/preprocessor/tuple/push_back.hpp>
|
|
#include <boost/preprocessor/tuple/size.hpp>
|
|
#include <boost/preprocessor/variadic/elem.hpp>
|
|
#include <boost/vmd/is_empty.hpp>
|
|
#include <boost/vmd/detail/empty_result.hpp>
|
|
#include <boost/vmd/detail/mods.hpp>
|
|
#include <boost/vmd/detail/not_empty.hpp>
|
|
#include <boost/vmd/detail/parens.hpp>
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_INIT(seq) \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_VMD_DETAIL_PARENS(seq,BOOST_VMD_RETURN_AFTER), \
|
|
BOOST_PP_EMPTY() \
|
|
), \
|
|
BOOST_PP_EMPTY() \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_INIT_D(d,seq) \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_VMD_DETAIL_PARENS_D(d,seq,BOOST_VMD_RETURN_AFTER), \
|
|
BOOST_PP_EMPTY() \
|
|
), \
|
|
BOOST_PP_EMPTY() \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_PRED(d,state) \
|
|
BOOST_VMD_DETAIL_NOT_EMPTY \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(0,state) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_FAILURE(d,state) \
|
|
( \
|
|
BOOST_PP_EMPTY(), \
|
|
BOOST_PP_EMPTY(), \
|
|
BOOST_PP_TUPLE_ELEM(2,state), \
|
|
BOOST_PP_TUPLE_ELEM(3,state) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_MAKE_SEQ(d,state) \
|
|
BOOST_PP_TUPLE_ELEM(0,state) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_UPGRADE_SEQ(d,state) \
|
|
BOOST_PP_SEQ_PUSH_BACK \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(2,state), \
|
|
BOOST_PP_TUPLE_ELEM \
|
|
( \
|
|
0, \
|
|
BOOST_PP_TUPLE_ELEM(0,state) \
|
|
) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_SUCCESS(d,state) \
|
|
( \
|
|
BOOST_PP_EMPTY(), \
|
|
BOOST_PP_EMPTY(), \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_IS_EMPTY \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(2,state) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_MAKE_SEQ, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_UPGRADE_SEQ \
|
|
) \
|
|
(d,state), \
|
|
BOOST_PP_EMPTY() \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_CONTINUE(d,state) \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_PP_TUPLE_PUSH_BACK \
|
|
( \
|
|
BOOST_VMD_DETAIL_PARENS_D(d,BOOST_PP_TUPLE_ELEM(1,state),BOOST_VMD_RETURN_AFTER), \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_IS_EMPTY \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(2,state) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_MAKE_SEQ, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_UPGRADE_SEQ \
|
|
) \
|
|
(d,state) \
|
|
), \
|
|
BOOST_PP_TUPLE_ELEM(1,state) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP_CHECK_REST(d,state) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_IS_EMPTY \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(1,state) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_SUCCESS, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_CONTINUE \
|
|
) \
|
|
(d,state) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_OP(d,state) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_PP_EQUAL_D \
|
|
( \
|
|
d, \
|
|
1, \
|
|
BOOST_PP_TUPLE_SIZE \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(0,state) \
|
|
) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_CHECK_REST, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP_SET_FAILURE \
|
|
) \
|
|
(d,state) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_STATE_RESULT(state) \
|
|
( \
|
|
BOOST_PP_TUPLE_ELEM(2,state), \
|
|
BOOST_PP_TUPLE_ELEM(3,state) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_PROCESS(seq) \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_RESULT \
|
|
( \
|
|
BOOST_PP_WHILE \
|
|
( \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_PRED, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_INIT(seq) \
|
|
) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_SPLIT(seq) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_IS_EMPTY(seq), \
|
|
BOOST_VMD_DETAIL_EMPTY_RESULT, \
|
|
BOOST_VMD_DETAIL_SEQ_PROCESS \
|
|
) \
|
|
(seq) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_BEGIN(seq) \
|
|
BOOST_PP_TUPLE_ELEM(0,BOOST_VMD_DETAIL_SEQ_SPLIT(seq)) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_PROCESS_D(d,seq) \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_RESULT \
|
|
( \
|
|
BOOST_PP_WHILE_ ## d \
|
|
( \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_PRED, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_OP, \
|
|
BOOST_VMD_DETAIL_SEQ_STATE_INIT_D(d,seq) \
|
|
) \
|
|
) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_SPLIT_D(d,seq) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_IS_EMPTY(seq), \
|
|
BOOST_VMD_DETAIL_EMPTY_RESULT, \
|
|
BOOST_VMD_DETAIL_SEQ_PROCESS_D \
|
|
) \
|
|
(d,seq) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_BEGIN_D(d,seq) \
|
|
BOOST_PP_TUPLE_ELEM(0,BOOST_VMD_DETAIL_SEQ_SPLIT_D(d,seq)) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ_D(d,...) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER \
|
|
( \
|
|
BOOST_VMD_DETAIL_NEW_MODS_D(d,BOOST_VMD_ALLOW_AFTER,__VA_ARGS__) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_SPLIT_D, \
|
|
BOOST_VMD_DETAIL_SEQ_BEGIN_D \
|
|
) \
|
|
(d,BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__)) \
|
|
/**/
|
|
|
|
#define BOOST_VMD_DETAIL_SEQ(...) \
|
|
BOOST_PP_IIF \
|
|
( \
|
|
BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER \
|
|
( \
|
|
BOOST_VMD_DETAIL_NEW_MODS(BOOST_VMD_ALLOW_AFTER,__VA_ARGS__) \
|
|
), \
|
|
BOOST_VMD_DETAIL_SEQ_SPLIT, \
|
|
BOOST_VMD_DETAIL_SEQ_BEGIN \
|
|
) \
|
|
(BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__)) \
|
|
/**/
|
|
|
|
#endif /* BOOST_VMD_DETAIL_SEQ_HPP */
|