diff options
Diffstat (limited to 'boost/vmd/detail/identifier.hpp')
| -rw-r--r-- | boost/vmd/detail/identifier.hpp | 429 |
1 files changed, 429 insertions, 0 deletions
diff --git a/boost/vmd/detail/identifier.hpp b/boost/vmd/detail/identifier.hpp new file mode 100644 index 0000000000..9ebc705c54 --- /dev/null +++ b/boost/vmd/detail/identifier.hpp @@ -0,0 +1,429 @@ + +// (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_IDENTIFIER_HPP) +#define BOOST_VMD_DETAIL_IDENTIFIER_HPP + +#include <boost/preprocessor/arithmetic/dec.hpp> +#include <boost/preprocessor/comparison/equal.hpp> +#include <boost/preprocessor/control/expr_iif.hpp> +#include <boost/preprocessor/control/iif.hpp> +#include <boost/preprocessor/logical/bitand.hpp> +#include <boost/preprocessor/logical/bitor.hpp> +#include <boost/preprocessor/punctuation/is_begin_parens.hpp> +#include <boost/preprocessor/tuple/elem.hpp> +#include <boost/preprocessor/variadic/elem.hpp> +#include <boost/vmd/identity.hpp> +#include <boost/vmd/is_empty.hpp> +#include <boost/vmd/detail/identifier_concat.hpp> +#include <boost/vmd/detail/is_entire.hpp> +#include <boost/vmd/detail/match_identifier.hpp> +#include <boost/vmd/detail/mods.hpp> +#include <boost/vmd/detail/not_empty.hpp> +#include <boost/vmd/detail/parens.hpp> + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS(id,rest,keymatch,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,BOOST_PP_DEC(keymatch),mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE(id,rest,keymatch,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT(id,rest,keymatch,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_EQUAL(keymatch,0), \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE, \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS \ + ) \ + (id,rest,keymatch,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT_D(d,id,rest,keymatch,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_EQUAL_D(d,keymatch,0), \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE, \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS \ + ) \ + (id,rest,keymatch,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE(id,rest,keytuple,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT \ + ( \ + id, \ + rest, \ + BOOST_VMD_DETAIL_MATCH_IDENTIFIER(id,keytuple), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_D(d,id,rest,keytuple,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT_D \ + ( \ + d, \ + id, \ + rest, \ + BOOST_VMD_DETAIL_MATCH_IDENTIFIER_D(d,id,keytuple), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_MAKE_SPLIT(tuple) \ + ( \ + BOOST_PP_TUPLE_ELEM \ + ( \ + 0, \ + BOOST_PP_TUPLE_ELEM(0,tuple) \ + ), \ + BOOST_PP_TUPLE_ELEM(1,tuple) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT_DATA(tuple) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY \ + ( \ + BOOST_PP_TUPLE_ELEM(0,tuple) \ + ), \ + BOOST_VMD_IDENTITY(tuple), \ + BOOST_VMD_DETAIL_IDENTIFIER_MAKE_SPLIT \ + ) \ + (tuple) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT(vcseq) \ + BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT_DATA \ + ( \ + BOOST_VMD_DETAIL_PARENS(vcseq,BOOST_VMD_RETURN_AFTER) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_GETID_TID(tid) \ + BOOST_VMD_IDENTITY_RESULT \ + ( \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY(tid), \ + BOOST_VMD_IDENTITY(tid), \ + BOOST_PP_TUPLE_ELEM \ + ) \ + (0,tid) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq) \ + BOOST_VMD_DETAIL_IDENTIFIER_GETID_TID \ + ( \ + BOOST_VMD_DETAIL_PARENS(BOOST_VMD_DETAIL_IDENTIFIER_CONCATENATE(vseq)) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq) \ + BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_CONCATENATE(vseq) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS(id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE \ + ( \ + id, \ + rest, \ + BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_D(d,id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_D \ + ( \ + d, \ + id, \ + rest, \ + BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_JUST(id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,0,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_JUST_D(d,id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,0,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS(id,rest,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY \ + ( \ + BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \ + ), \ + BOOST_VMD_DETAIL_IDENTIFIER_JUST, \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS \ + ) \ + (id,rest,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D(d,id,rest,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY \ + ( \ + BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \ + ), \ + BOOST_VMD_DETAIL_IDENTIFIER_JUST_D, \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_D \ + ) \ + (d,id,rest,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods) \ + BOOST_PP_BITAND \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_INDEX(mods), \ + BOOST_VMD_DETAIL_NOT_EMPTY \ + ( \ + BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \ + ) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,keymatch,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods), \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + (id,rest,keymatch), \ + (id,keymatch) \ + ), \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + (id,rest), \ + id \ + ) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods), \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + (,,), \ + (,) \ + ), \ + BOOST_PP_EXPR_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + (,) \ + ) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST(id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D(d,id,rest,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_ID_REST(id,rest,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY(id), \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST, \ + BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS \ + ) \ + (id,rest,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_ID_REST_D(d,id,rest,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY(id), \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D, \ + BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D \ + ) \ + (d,id,rest,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA(tuple,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_ID_REST \ + ( \ + BOOST_PP_TUPLE_ELEM(0,tuple), \ + BOOST_PP_TUPLE_ELEM(1,tuple), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID(id,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY(id), \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST, \ + BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS \ + ) \ + (id,,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID_D(d,id,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_IS_EMPTY(id), \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D, \ + BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D \ + ) \ + (d,id,,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA_D(d,tuple,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_ID_REST_D \ + ( \ + d, \ + BOOST_PP_TUPLE_ELEM(0,tuple), \ + BOOST_PP_TUPLE_ELEM(1,tuple), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER(vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER_D(d,vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA_D \ + ( \ + d, \ + BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID(vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID_D(d,vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID_D \ + ( \ + d, \ + BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq), \ + mods \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE(vseq,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER, \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID \ + ) \ + (vseq,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_D(d,vseq,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER_D, \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID_D \ + ) \ + (d,vseq,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE(vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE_D(d,vseq,mods) \ + BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_EX(vseq,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_BITOR \ + ( \ + BOOST_VMD_IS_EMPTY(vseq), \ + BOOST_PP_IS_BEGIN_PARENS(vseq) \ + ), \ + BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE, \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE \ + ) \ + (vseq,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_EX_D(d,vseq,mods) \ + BOOST_PP_IIF \ + ( \ + BOOST_PP_BITOR \ + ( \ + BOOST_VMD_IS_EMPTY(vseq), \ + BOOST_PP_IS_BEGIN_PARENS(vseq) \ + ), \ + BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE_D, \ + BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_D \ + ) \ + (d,vseq,mods) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER(...) \ + BOOST_VMD_DETAIL_IDENTIFIER_EX \ + ( \ + BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__), \ + BOOST_VMD_DETAIL_NEW_MODS(BOOST_VMD_ALLOW_INDEX,__VA_ARGS__) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IDENTIFIER_D(d,...) \ + BOOST_VMD_DETAIL_IDENTIFIER_EX_D \ + ( \ + d, \ + BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__), \ + BOOST_VMD_DETAIL_NEW_MODS_D(d,BOOST_VMD_ALLOW_INDEX,__VA_ARGS__) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IS_IDENTIFIER_MULTIPLE(...) \ + BOOST_VMD_DETAIL_IS_ENTIRE \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER(__VA_ARGS__,BOOST_VMD_RETURN_AFTER) \ + ) \ +/**/ + +#define BOOST_VMD_DETAIL_IS_IDENTIFIER_MULTIPLE_D(d,...) \ + BOOST_VMD_DETAIL_IS_ENTIRE \ + ( \ + BOOST_VMD_DETAIL_IDENTIFIER_D(d,__VA_ARGS__,BOOST_VMD_RETURN_AFTER) \ + ) \ +/**/ + +#endif /* BOOST_VMD_DETAIL_IDENTIFIER_HPP */ |