preprocessor/list/to_tuple.hpp

0001 # /* Copyright (C) 2001
0002 #  * Housemarque Oy
0003 #  * http://www.housemarque.com
0004 #  *
0005 #  * Distributed under the Boost Software License, Version 1.0. (See
0006 #  * accompanying file LICENSE_1_0.txt or copy at
0007 #  * http://www.boost.org/LICENSE_1_0.txt)
0008 #  */
0009 0010 ">#
0011 # /* Revised by Paul Mensonides (2002) */
0012 0013 ">#
0014 # /* See http://www.boost.org for most recent version. */
0015 0016 ">#
0017 # ifndef BOOST_PREPROCESSOR_LIST_TO_TUPLE_HPP
0018 # define BOOST_PREPROCESSOR_LIST_TO_TUPLE_HPP
0019 0020 ">#
0021 # include <boost/preprocessor/config/config.hpp>
0022 # include <boost/preprocessor/list/enum.hpp>
0023 # include <boost/preprocessor/control/iif.hpp>
0024 0025 ">#
0026 # /* BOOST_PP_LIST_TO_TUPLE */
0027 0028 ">#
0029 # define BOOST_PP_LIST_TO_TUPLE(list) \
0030     BOOST_PP_IIF \
0031         ( \
0032         BOOST_PP_LIST_IS_NIL(list), \
0033         BOOST_PP_LIST_TO_TUPLE_EMPTY, \
0034         BOOST_PP_LIST_TO_TUPLE_DO \
0035         ) \
0036     (list) \
0037 /**/
0038 # define BOOST_PP_LIST_TO_TUPLE_EMPTY(list)
0039 0040 ">#
0041 # if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG()
0042 #    define BOOST_PP_LIST_TO_TUPLE_DO(list) (BOOST_PP_LIST_ENUM(list))
0043 # else
0044 #    define BOOST_PP_LIST_TO_TUPLE_DO(list) BOOST_PP_LIST_TO_TUPLE_I(list)
0045 #    define BOOST_PP_LIST_TO_TUPLE_I(list) (BOOST_PP_LIST_ENUM(list))
0046 # endif
0047 0048 ">#
0049 # /* BOOST_PP_LIST_TO_TUPLE_R */
0050 0051 ">#
0052 # define BOOST_PP_LIST_TO_TUPLE_R(r, list) \
0053     BOOST_PP_IIF \
0054         ( \
0055         BOOST_PP_LIST_IS_NIL(list), \
0056         BOOST_PP_LIST_TO_TUPLE_R_EMPTY, \
0057         BOOST_PP_LIST_TO_TUPLE_R_DO \
0058         ) \
0059     (r, list) \
0060 /**/
0061 # define BOOST_PP_LIST_TO_TUPLE_R_EMPTY(r,list)
0062 0063 ">#
0064 # if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG()
0065 #    define BOOST_PP_LIST_TO_TUPLE_R_DO(r, list) (BOOST_PP_LIST_ENUM_R(r, list))
0066 # else
0067 #    define BOOST_PP_LIST_TO_TUPLE_R_DO(r, list) BOOST_PP_LIST_TO_TUPLE_R_I(r, list)
0068 #    define BOOST_PP_LIST_TO_TUPLE_R_I(r, list) (BOOST_PP_LIST_ENUM_R(r, list))
0069 # endif
0070 0071 ">#
0072 # endif