Chris@16
|
1 # /* **************************************************************************
|
Chris@16
|
2 # * *
|
Chris@16
|
3 # * (C) Copyright Paul Mensonides 2002.
|
Chris@16
|
4 # * Distributed under the Boost Software License, Version 1.0. (See
|
Chris@16
|
5 # * accompanying file LICENSE_1_0.txt or copy at
|
Chris@16
|
6 # * http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
7 # * *
|
Chris@16
|
8 # ************************************************************************** */
|
Chris@16
|
9 #
|
Chris@16
|
10 # /* See http://www.boost.org for most recent version. */
|
Chris@16
|
11 #
|
Chris@16
|
12 # ifndef BOOST_PREPROCESSOR_SEQ_CAT_HPP
|
Chris@16
|
13 # define BOOST_PREPROCESSOR_SEQ_CAT_HPP
|
Chris@16
|
14 #
|
Chris@16
|
15 # include <boost/preprocessor/arithmetic/dec.hpp>
|
Chris@16
|
16 # include <boost/preprocessor/config/config.hpp>
|
Chris@16
|
17 # include <boost/preprocessor/control/if.hpp>
|
Chris@16
|
18 # include <boost/preprocessor/seq/fold_left.hpp>
|
Chris@16
|
19 # include <boost/preprocessor/seq/seq.hpp>
|
Chris@16
|
20 # include <boost/preprocessor/seq/size.hpp>
|
Chris@16
|
21 # include <boost/preprocessor/tuple/eat.hpp>
|
Chris@16
|
22 #
|
Chris@16
|
23 # /* BOOST_PP_SEQ_CAT */
|
Chris@16
|
24 #
|
Chris@16
|
25 # define BOOST_PP_SEQ_CAT(seq) \
|
Chris@16
|
26 BOOST_PP_IF( \
|
Chris@16
|
27 BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(seq)), \
|
Chris@16
|
28 BOOST_PP_SEQ_CAT_I, \
|
Chris@16
|
29 BOOST_PP_SEQ_HEAD \
|
Chris@16
|
30 )(seq) \
|
Chris@16
|
31 /**/
|
Chris@16
|
32 # 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))
|
Chris@16
|
33 #
|
Chris@16
|
34 # define BOOST_PP_SEQ_CAT_O(s, st, elem) BOOST_PP_SEQ_CAT_O_I(st, elem)
|
Chris@16
|
35 # define BOOST_PP_SEQ_CAT_O_I(a, b) a ## b
|
Chris@16
|
36 #
|
Chris@16
|
37 # /* BOOST_PP_SEQ_CAT_S */
|
Chris@16
|
38 #
|
Chris@16
|
39 # define BOOST_PP_SEQ_CAT_S(s, seq) \
|
Chris@16
|
40 BOOST_PP_IF( \
|
Chris@16
|
41 BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(seq)), \
|
Chris@16
|
42 BOOST_PP_SEQ_CAT_S_I_A, \
|
Chris@16
|
43 BOOST_PP_SEQ_CAT_S_I_B \
|
Chris@16
|
44 )(s, seq) \
|
Chris@16
|
45 /**/
|
Chris@16
|
46 # 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))
|
Chris@16
|
47 # define BOOST_PP_SEQ_CAT_S_I_B(s, seq) BOOST_PP_SEQ_HEAD(seq)
|
Chris@16
|
48 #
|
Chris@16
|
49 # endif
|