preprocessor/seq/cat.hpp

0001 # /* **************************************************************************
0002 #  *                                                                          *
0003 #  *     (C) Copyright Paul Mensonides 2002.
0004 #  *     Distributed under the Boost Software License, Version 1.0. (See
0005 #  *     accompanying file LICENSE_1_0.txt or copy at
0006 #  *     http://www.boost.org/LICENSE_1_0.txt)
0007 #  *                                                                          *
0008 #  ************************************************************************** */
0009 0010 ">#
0011 # /* See http://www.boost.org for most recent version. */
0012 0013 ">#
0014 # ifndef BOOST_PREPROCESSOR_SEQ_CAT_HPP
0015 # define BOOST_PREPROCESSOR_SEQ_CAT_HPP
0016 0017 ">#
0018 # include <boost/preprocessor/arithmetic/dec.hpp>
0019 # include <boost/preprocessor/config/config.hpp>
0020 # include <boost/preprocessor/control/if.hpp>
0021 # include <boost/preprocessor/seq/fold_left.hpp>
0022 # include <boost/preprocessor/seq/seq.hpp>
0023 # include <boost/preprocessor/seq/size.hpp>
0024 # include <boost/preprocessor/tuple/eat.hpp>
0025 0026 ">#
0027 # /* BOOST_PP_SEQ_CAT */
0028 0029 ">#
0030 # define BOOST_PP_SEQ_CAT(seq) \
0031     BOOST_PP_IF( \
0032         BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(seq)), \
0033         BOOST_PP_SEQ_CAT_I, \
0034         BOOST_PP_SEQ_HEAD \
0035     )(seq) \
0036     /**/
0037 # define BOOST_PP_SEQ_CAT_I(seq) BOOST_PP_SEQ_FOLD_LEFT(BOOST_PP_SEQ_CAT_O, BOOST_PP_SEQ_HEAD(seq), BOOST_PP_SEQ_TAIL(seq))
0038 0039 ">#
0040 # define BOOST_PP_SEQ_CAT_O(s, st, elem) BOOST_PP_SEQ_CAT_O_I(st, elem)
0041 # define BOOST_PP_SEQ_CAT_O_I(a, b) a ## b
0042 0043 ">#
0044 # /* BOOST_PP_SEQ_CAT_S */
0045 0046 ">#
0047 # define BOOST_PP_SEQ_CAT_S(s, seq) \
0048     BOOST_PP_IF( \
0049         BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(seq)), \
0050         BOOST_PP_SEQ_CAT_S_I_A, \
0051         BOOST_PP_SEQ_CAT_S_I_B \
0052     )(s, seq) \
0053     /**/
0054 # define BOOST_PP_SEQ_CAT_S_I_A(s, seq) BOOST_PP_SEQ_FOLD_LEFT_ ## s(BOOST_PP_SEQ_CAT_O, BOOST_PP_SEQ_HEAD(seq), BOOST_PP_SEQ_TAIL(seq))
0055 # define BOOST_PP_SEQ_CAT_S_I_B(s, seq) BOOST_PP_SEQ_HEAD(seq)
0056 0057 ">#
0058 # endif