source: NonGTP/Boost/boost/preprocessor/seq/cat.hpp @ 857

Revision 857, 1.8 KB checked in by igarcia, 19 years ago (diff)
RevLine 
[857]1# /* **************************************************************************
2#  *                                                                          *
3#  *     (C) Copyright Paul Mensonides 2002.
4#  *     Distributed under the Boost Software License, Version 1.0. (See
5#  *     accompanying file LICENSE_1_0.txt or copy at
6#  *     http://www.boost.org/LICENSE_1_0.txt)
7#  *                                                                          *
8#  ************************************************************************** */
9#
10# /* See http://www.boost.org for most recent version. */
11#
12# ifndef BOOST_PREPROCESSOR_SEQ_CAT_HPP
13# define BOOST_PREPROCESSOR_SEQ_CAT_HPP
14#
15# include <boost/preprocessor/config/config.hpp>
16# include <boost/preprocessor/seq/fold_left.hpp>
17# include <boost/preprocessor/seq/seq.hpp>
18#
19# /* BOOST_PP_SEQ_CAT */
20#
21# if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG()
22#    define BOOST_PP_SEQ_CAT(seq) BOOST_PP_SEQ_FOLD_LEFT(BOOST_PP_SEQ_CAT_O, BOOST_PP_SEQ_HEAD(seq), BOOST_PP_SEQ_TAIL(seq))
23# else
24#    define BOOST_PP_SEQ_CAT(seq) BOOST_PP_SEQ_CAT_I(seq)
25#    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))
26# endif
27#
28# define BOOST_PP_SEQ_CAT_O(s, st, elem) BOOST_PP_SEQ_CAT_O_I(st, elem)
29# define BOOST_PP_SEQ_CAT_O_I(a, b) a ## b
30#
31# /* BOOST_PP_SEQ_CAT_S */
32#
33# if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG()
34#    define BOOST_PP_SEQ_CAT_S(s, seq) BOOST_PP_SEQ_FOLD_LEFT_ ## s(BOOST_PP_SEQ_CAT_O, BOOST_PP_SEQ_HEAD(seq), BOOST_PP_SEQ_TAIL(seq))
35# else
36#    define BOOST_PP_SEQ_CAT_S(s, seq) BOOST_PP_SEQ_CAT_S_I(s, seq)
37#    define BOOST_PP_SEQ_CAT_S_I(s, seq) BOOST_PP_SEQ_FOLD_LEFT_ ## s(BOOST_PP_SEQ_CAT_O, BOOST_PP_SEQ_HEAD(seq), BOOST_PP_SEQ_TAIL(seq))
38# endif
39#
40# endif
Note: See TracBrowser for help on using the repository browser.