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_FOR_EACH_HPP |
13 | # define BOOST_PREPROCESSOR_SEQ_FOR_EACH_HPP |
14 | # |
15 | # include <boost/preprocessor/arithmetic/dec.hpp> |
16 | # include <boost/preprocessor/config/config.hpp> |
17 | # include <boost/preprocessor/control/if.hpp> |
18 | # include <boost/preprocessor/control/iif.hpp> |
19 | # include <boost/preprocessor/repetition/for.hpp> |
20 | # include <boost/preprocessor/seq/seq.hpp> |
21 | # include <boost/preprocessor/seq/size.hpp> |
22 | # include <boost/preprocessor/seq/detail/is_empty.hpp> |
23 | # include <boost/preprocessor/tuple/elem.hpp> |
24 | # include <boost/preprocessor/tuple/rem.hpp> |
25 | # |
26 | # /* BOOST_PP_SEQ_FOR_EACH */ |
27 | # |
28 | # if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG() |
29 | # define BOOST_PP_SEQ_FOR_EACH(macro, data, seq) BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK(macro, data, seq) |
30 | # else |
31 | # define BOOST_PP_SEQ_FOR_EACH(macro, data, seq) BOOST_PP_SEQ_FOR_EACH_D(macro, data, seq) |
32 | # define BOOST_PP_SEQ_FOR_EACH_D(macro, data, seq) BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK(macro, data, seq) |
33 | # endif |
34 | # |
35 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EXEC(macro, data, seq) BOOST_PP_FOR((macro, data, seq, BOOST_PP_SEQ_SIZE(seq)), BOOST_PP_SEQ_FOR_EACH_P, BOOST_PP_SEQ_FOR_EACH_O, BOOST_PP_SEQ_FOR_EACH_M) |
36 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EMPTY(macro, data, seq) |
37 | # |
38 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK(macro, data, seq) \ |
39 | BOOST_PP_IIF \ |
40 | ( \ |
41 | BOOST_PP_SEQ_DETAIL_IS_NOT_EMPTY(seq), \ |
42 | BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EXEC, \ |
43 | BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EMPTY \ |
44 | ) \ |
45 | (macro, data, seq) \ |
46 | /**/ |
47 | # |
48 | # define BOOST_PP_SEQ_FOR_EACH_P(r, x) BOOST_PP_TUPLE_ELEM(4, 3, x) |
49 | # |
50 | # if BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_STRICT() |
51 | # define BOOST_PP_SEQ_FOR_EACH_O(r, x) BOOST_PP_SEQ_FOR_EACH_O_I x |
52 | # else |
53 | # define BOOST_PP_SEQ_FOR_EACH_O(r, x) BOOST_PP_SEQ_FOR_EACH_O_I(BOOST_PP_TUPLE_ELEM(4, 0, x), BOOST_PP_TUPLE_ELEM(4, 1, x), BOOST_PP_TUPLE_ELEM(4, 2, x), BOOST_PP_TUPLE_ELEM(4, 3, x)) |
54 | # endif |
55 | # |
56 | # define BOOST_PP_SEQ_FOR_EACH_O_I(macro, data, seq, sz) \ |
57 | BOOST_PP_SEQ_FOR_EACH_O_I_DEC(macro, data, seq, BOOST_PP_DEC(sz)) \ |
58 | /**/ |
59 | # define BOOST_PP_SEQ_FOR_EACH_O_I_DEC(macro, data, seq, sz) \ |
60 | ( \ |
61 | macro, \ |
62 | data, \ |
63 | BOOST_PP_IF \ |
64 | ( \ |
65 | sz, \ |
66 | BOOST_PP_SEQ_FOR_EACH_O_I_TAIL, \ |
67 | BOOST_PP_SEQ_FOR_EACH_O_I_NIL \ |
68 | ) \ |
69 | (seq), \ |
70 | sz \ |
71 | ) \ |
72 | /**/ |
73 | # define BOOST_PP_SEQ_FOR_EACH_O_I_TAIL(seq) BOOST_PP_SEQ_TAIL(seq) |
74 | # define BOOST_PP_SEQ_FOR_EACH_O_I_NIL(seq) BOOST_PP_NIL |
75 | # |
76 | # if BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_STRICT() |
77 | # define BOOST_PP_SEQ_FOR_EACH_M(r, x) BOOST_PP_SEQ_FOR_EACH_M_IM(r, BOOST_PP_TUPLE_REM_4 x) |
78 | # define BOOST_PP_SEQ_FOR_EACH_M_IM(r, im) BOOST_PP_SEQ_FOR_EACH_M_I(r, im) |
79 | # else |
80 | # define BOOST_PP_SEQ_FOR_EACH_M(r, x) BOOST_PP_SEQ_FOR_EACH_M_I(r, BOOST_PP_TUPLE_ELEM(4, 0, x), BOOST_PP_TUPLE_ELEM(4, 1, x), BOOST_PP_TUPLE_ELEM(4, 2, x), BOOST_PP_TUPLE_ELEM(4, 3, x)) |
81 | # endif |
82 | # |
83 | # define BOOST_PP_SEQ_FOR_EACH_M_I(r, macro, data, seq, sz) macro(r, data, BOOST_PP_SEQ_HEAD(seq)) |
84 | # |
85 | # /* BOOST_PP_SEQ_FOR_EACH_R */ |
86 | # |
87 | # if ~BOOST_PP_CONFIG_FLAGS() & BOOST_PP_CONFIG_EDG() |
88 | # define BOOST_PP_SEQ_FOR_EACH_R(r, macro, data, seq) BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_R(r, macro, data, seq) |
89 | # else |
90 | # define BOOST_PP_SEQ_FOR_EACH_R(r, macro, data, seq) BOOST_PP_SEQ_FOR_EACH_R_I(r, macro, data, seq) |
91 | # define BOOST_PP_SEQ_FOR_EACH_R_I(r, macro, data, seq) BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_R(r, macro, data, seq) |
92 | # endif |
93 | # |
94 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EXEC_R(r, macro, data, seq) BOOST_PP_FOR_ ## r((macro, data, seq, BOOST_PP_SEQ_SIZE(seq)), BOOST_PP_SEQ_FOR_EACH_P, BOOST_PP_SEQ_FOR_EACH_O, BOOST_PP_SEQ_FOR_EACH_M) |
95 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EMPTY_R(r, macro, data, seq) |
96 | # |
97 | # define BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_R(r, macro, data, seq) \ |
98 | BOOST_PP_IIF \ |
99 | ( \ |
100 | BOOST_PP_SEQ_DETAIL_IS_NOT_EMPTY(seq), \ |
101 | BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EXEC_R, \ |
102 | BOOST_PP_SEQ_FOR_EACH_DETAIL_CHECK_EMPTY_R \ |
103 | ) \ |
104 | (r, macro, data, seq) \ |
105 | /**/ |
106 | # |
107 | # endif |
108 | |