123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160 |
- // (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_MATCH_IDENTIFIER_HPP)
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_HPP
- #include <boost/preprocessor/arithmetic/inc.hpp>
- #include <boost/preprocessor/cat.hpp>
- #include <boost/preprocessor/comparison/equal.hpp>
- #include <boost/preprocessor/comparison/not_equal.hpp>
- #include <boost/preprocessor/control/iif.hpp>
- #include <boost/preprocessor/control/while.hpp>
- #include <boost/preprocessor/logical/bitand.hpp>
- #include <boost/preprocessor/tuple/elem.hpp>
- #include <boost/preprocessor/tuple/replace.hpp>
- #include <boost/preprocessor/tuple/size.hpp>
- #include <boost/vmd/is_empty.hpp>
- #include <boost/vmd/detail/idprefix.hpp>
- #include <boost/vmd/detail/match_identifier_common.hpp>
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_ID(state) \
- BOOST_PP_TUPLE_ELEM(0,state) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_TUPLE(state) \
- BOOST_PP_TUPLE_ELEM(1,state) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_TUPLE_SIZE(state) \
- BOOST_PP_TUPLE_ELEM(2,state) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_CURRENT(state) \
- BOOST_PP_TUPLE_ELEM \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_INDEX(state), \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_TUPLE(state) \
- ) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_INDEX(state) \
- BOOST_PP_TUPLE_ELEM(3,state) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_RESULT(state) \
- BOOST_PP_TUPLE_ELEM(4,state) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_PRED(d,state) \
- BOOST_PP_BITAND \
- ( \
- BOOST_PP_EQUAL_D \
- ( \
- d, \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_RESULT(state), \
- 0 \
- ), \
- BOOST_PP_NOT_EQUAL_D \
- ( \
- d, \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_INDEX(state), \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_TUPLE_SIZE(state) \
- ) \
- ) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP_FOUND(d,state) \
- BOOST_PP_TUPLE_REPLACE_D \
- ( \
- d, \
- state, \
- 4, \
- BOOST_PP_INC \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_INDEX(state) \
- ) \
- ) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP_CONTINUE(d,state) \
- BOOST_PP_TUPLE_REPLACE_D \
- ( \
- d, \
- state, \
- 3, \
- BOOST_PP_INC \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_INDEX(state) \
- ) \
- ) \
- /**/
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP(d,state) \
- BOOST_PP_IIF \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP_CMP_IDS \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_ID(state), \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_STATE_KEY_CURRENT(state) \
- ), \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP_FOUND, \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP_CONTINUE \
- ) \
- (d,state) \
- /**/
- /*
- Return index starting with 1 of the tuple id the identifier matches, or 0 if there are no matches.
- */
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER(id,keytuple) \
- BOOST_PP_TUPLE_ELEM \
- ( \
- 4, \
- BOOST_PP_WHILE \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_PRED, \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP, \
- ( \
- id, \
- keytuple, \
- BOOST_PP_TUPLE_SIZE(keytuple), \
- 0, \
- 0 \
- ) \
- ) \
- ) \
- /**/
- /*
- Return index starting with 1 of the tuple id the identifier matches, or 0 if there are no matches.
- */
- #define BOOST_VMD_DETAIL_MATCH_IDENTIFIER_D(d,id,keytuple) \
- BOOST_PP_TUPLE_ELEM \
- ( \
- 4, \
- BOOST_PP_WHILE_ ## d \
- ( \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_PRED, \
- BOOST_VMD_DETAIL_MATCH_IDENTIFIER_OP, \
- ( \
- id, \
- keytuple, \
- BOOST_PP_TUPLE_SIZE(keytuple), \
- 0, \
- 0 \
- ) \
- ) \
- ) \
- /**/
- #endif /* BOOST_VMD_DETAIL_MATCH_IDENTIFIER_HPP */
|