preprocessor/list/to_array.hpp

0001 # /* **************************************************************************
0002 #  *                                                                          *
0003 #  *     (C) Copyright Paul Mensonides 2011.
0004 #  *     (C) Copyright Edward Diener 2011,2014.
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 ">#
0012 # /* See http://www.boost.org for most recent version. */
0013 0014 ">#
0015 # ifndef BOOST_PREPROCESSOR_LIST_TO_ARRAY_HPP
0016 # define BOOST_PREPROCESSOR_LIST_TO_ARRAY_HPP
0017 0018 ">#
0019 # include <boost/preprocessor/arithmetic/dec.hpp>
0020 # include <boost/preprocessor/arithmetic/inc.hpp>
0021 # include <boost/preprocessor/config/config.hpp>
0022 # include <boost/preprocessor/control/while.hpp>
0023 # include <boost/preprocessor/list/adt.hpp>
0024 # include <boost/preprocessor/tuple/elem.hpp>
0025 # include <boost/preprocessor/tuple/rem.hpp>
0026 # if BOOST_PP_VARIADICS_MSVC && (_MSC_VER <= 1400)
0027 # include <boost/preprocessor/control/iif.hpp>
0028 # endif
0029 0030 ">#
0031 # /* BOOST_PP_LIST_TO_ARRAY */
0032 0033 ">#
0034 # if BOOST_PP_VARIADICS_MSVC && (_MSC_VER <= 1400)
0035 # define BOOST_PP_LIST_TO_ARRAY(list) \
0036     BOOST_PP_IIF \
0037         ( \
0038         BOOST_PP_LIST_IS_NIL(list), \
0039         BOOST_PP_LIST_TO_ARRAY_VC8ORLESS_EMPTY, \
0040         BOOST_PP_LIST_TO_ARRAY_VC8ORLESS_DO \
0041         ) \
0042     (list) \
0043 /**/
0044 # define BOOST_PP_LIST_TO_ARRAY_VC8ORLESS_EMPTY(list) (0,())
0045 # define BOOST_PP_LIST_TO_ARRAY_VC8ORLESS_DO(list) BOOST_PP_LIST_TO_ARRAY_I(BOOST_PP_WHILE, list)
0046 # else
0047 # define BOOST_PP_LIST_TO_ARRAY(list) BOOST_PP_LIST_TO_ARRAY_I(BOOST_PP_WHILE, list)
0048 # endif
0049
0050 # if BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_MSVC()
0051 #    define BOOST_PP_LIST_TO_ARRAY_I(w, list) \
0052         BOOST_PP_LIST_TO_ARRAY_II(((BOOST_PP_TUPLE_REM_CTOR( \
0053             3, \
0054             w(BOOST_PP_LIST_TO_ARRAY_P, BOOST_PP_LIST_TO_ARRAY_O, (list, 1, (~))) \
0055         )))) \
0056         /**/
0057 #    define BOOST_PP_LIST_TO_ARRAY_II(p) BOOST_PP_LIST_TO_ARRAY_II_B(p)
0058 #    define BOOST_PP_LIST_TO_ARRAY_II_B(p) BOOST_PP_LIST_TO_ARRAY_II_C ## p
0059 #    define BOOST_PP_LIST_TO_ARRAY_II_C(p) BOOST_PP_LIST_TO_ARRAY_III p
0060 # else
0061 #    define BOOST_PP_LIST_TO_ARRAY_I(w, list) \
0062         BOOST_PP_LIST_TO_ARRAY_II(BOOST_PP_TUPLE_REM_CTOR( \
0063             3, \
0064             w(BOOST_PP_LIST_TO_ARRAY_P, BOOST_PP_LIST_TO_ARRAY_O, (list, 1, (~))) \
0065         )) \
0066         /**/
0067 #    define BOOST_PP_LIST_TO_ARRAY_II(im) BOOST_PP_LIST_TO_ARRAY_III(im)
0068 # endif
0069 # define BOOST_PP_LIST_TO_ARRAY_III(list, size, tuple) (BOOST_PP_DEC(size), BOOST_PP_LIST_TO_ARRAY_IV tuple)
0070 # define BOOST_PP_LIST_TO_ARRAY_IV(_, ...) (__VA_ARGS__)
0071 # define BOOST_PP_LIST_TO_ARRAY_P(d, state) BOOST_PP_LIST_IS_CONS(BOOST_PP_TUPLE_ELEM(3, 0, state))
0072 # define BOOST_PP_LIST_TO_ARRAY_O(d, state) BOOST_PP_LIST_TO_ARRAY_O_I state
0073 # define BOOST_PP_LIST_TO_ARRAY_O_I(list, size, tuple) (BOOST_PP_LIST_REST(list), BOOST_PP_INC(size), (BOOST_PP_TUPLE_REM(size) tuple, BOOST_PP_LIST_FIRST(list)))
0074 0075 ">#
0076 # /* BOOST_PP_LIST_TO_ARRAY_D */
0077 0078 ">#
0079 # if BOOST_PP_VARIADICS_MSVC && (_MSC_VER <= 1400)
0080 # define BOOST_PP_LIST_TO_ARRAY_D(d, list) \
0081     BOOST_PP_IIF \
0082         ( \
0083         BOOST_PP_LIST_IS_NIL(list), \
0084         BOOST_PP_LIST_TO_ARRAY_D_VC8ORLESS_EMPTY, \
0085         BOOST_PP_LIST_TO_ARRAY_D_VC8ORLESS_DO \
0086         ) \
0087     (d, list) \
0088 /**/
0089 # define BOOST_PP_LIST_TO_ARRAY_D_VC8ORLESS_EMPTY(d, list) (0,())
0090 # define BOOST_PP_LIST_TO_ARRAY_D_VC8ORLESS_DO(d, list) BOOST_PP_LIST_TO_ARRAY_I(BOOST_PP_WHILE_ ## d, list)
0091 # else
0092 # define BOOST_PP_LIST_TO_ARRAY_D(d, list) BOOST_PP_LIST_TO_ARRAY_I(BOOST_PP_WHILE_ ## d, list)
0093 # endif
0094 0095 ">#
0096 # endif /* BOOST_PREPROCESSOR_LIST_TO_ARRAY_HPP */