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 FB_BOOST_PREPROCESSOR_SEQ_FOR_EACH_I_HPP
13# define FB_BOOST_PREPROCESSOR_SEQ_FOR_EACH_I_HPP
14#
15# include <firebird/impl/boost/preprocessor/arithmetic/dec.hpp>
16# include <firebird/impl/boost/preprocessor/arithmetic/inc.hpp>
17# include <firebird/impl/boost/preprocessor/config/config.hpp>
18# include <firebird/impl/boost/preprocessor/repetition/for.hpp>
19# include <firebird/impl/boost/preprocessor/seq/seq.hpp>
20# include <firebird/impl/boost/preprocessor/seq/size.hpp>
21# include <firebird/impl/boost/preprocessor/tuple/elem.hpp>
22# include <firebird/impl/boost/preprocessor/tuple/rem.hpp>
23#
24# /* FB_BOOST_PP_SEQ_FOR_EACH_I */
25#
26# if ~FB_BOOST_PP_CONFIG_FLAGS() & FB_BOOST_PP_CONFIG_EDG()
27# define FB_BOOST_PP_SEQ_FOR_EACH_I(macro, data, seq) FB_BOOST_PP_FOR((macro, data, seq (nil), 0), FB_BOOST_PP_SEQ_FOR_EACH_I_P, FB_BOOST_PP_SEQ_FOR_EACH_I_O, FB_BOOST_PP_SEQ_FOR_EACH_I_M)
28# else
29# define FB_BOOST_PP_SEQ_FOR_EACH_I(macro, data, seq) FB_BOOST_PP_SEQ_FOR_EACH_I_I(macro, data, seq)
30# define FB_BOOST_PP_SEQ_FOR_EACH_I_I(macro, data, seq) FB_BOOST_PP_FOR((macro, data, seq (nil), 0), FB_BOOST_PP_SEQ_FOR_EACH_I_P, FB_BOOST_PP_SEQ_FOR_EACH_I_O, FB_BOOST_PP_SEQ_FOR_EACH_I_M)
31# endif
32#
33# define FB_BOOST_PP_SEQ_FOR_EACH_I_P(r, x) FB_BOOST_PP_DEC(FB_BOOST_PP_SEQ_SIZE(FB_BOOST_PP_TUPLE_ELEM(4, 2, x)))
34#
35# if FB_BOOST_PP_CONFIG_FLAGS() & FB_BOOST_PP_CONFIG_STRICT()
36# define FB_BOOST_PP_SEQ_FOR_EACH_I_O(r, x) FB_BOOST_PP_SEQ_FOR_EACH_I_O_I x
37# else
38# define FB_BOOST_PP_SEQ_FOR_EACH_I_O(r, x) FB_BOOST_PP_SEQ_FOR_EACH_I_O_I(FB_BOOST_PP_TUPLE_ELEM(4, 0, x), FB_BOOST_PP_TUPLE_ELEM(4, 1, x), FB_BOOST_PP_TUPLE_ELEM(4, 2, x), FB_BOOST_PP_TUPLE_ELEM(4, 3, x))
39# endif
40#
41# define FB_BOOST_PP_SEQ_FOR_EACH_I_O_I(macro, data, seq, i) (macro, data, FB_BOOST_PP_SEQ_TAIL(seq), FB_BOOST_PP_INC(i))
42#
43# if FB_BOOST_PP_CONFIG_FLAGS() & FB_BOOST_PP_CONFIG_STRICT()
44# define FB_BOOST_PP_SEQ_FOR_EACH_I_M(r, x) FB_BOOST_PP_SEQ_FOR_EACH_I_M_IM(r, FB_BOOST_PP_TUPLE_REM_4 x)
45# define FB_BOOST_PP_SEQ_FOR_EACH_I_M_IM(r, im) FB_BOOST_PP_SEQ_FOR_EACH_I_M_I(r, im)
46# else
47# define FB_BOOST_PP_SEQ_FOR_EACH_I_M(r, x) FB_BOOST_PP_SEQ_FOR_EACH_I_M_I(r, FB_BOOST_PP_TUPLE_ELEM(4, 0, x), FB_BOOST_PP_TUPLE_ELEM(4, 1, x), FB_BOOST_PP_TUPLE_ELEM(4, 2, x), FB_BOOST_PP_TUPLE_ELEM(4, 3, x))
48# endif
49#
50# define FB_BOOST_PP_SEQ_FOR_EACH_I_M_I(r, macro, data, seq, i) macro(r, data, i, FB_BOOST_PP_SEQ_HEAD(seq))
51#
52# /* FB_BOOST_PP_SEQ_FOR_EACH_I_R */
53#
54# if ~FB_BOOST_PP_CONFIG_FLAGS() & FB_BOOST_PP_CONFIG_EDG()
55# define FB_BOOST_PP_SEQ_FOR_EACH_I_R(r, macro, data, seq) FB_BOOST_PP_FOR_ ## r((macro, data, seq (nil), 0), FB_BOOST_PP_SEQ_FOR_EACH_I_P, FB_BOOST_PP_SEQ_FOR_EACH_I_O, FB_BOOST_PP_SEQ_FOR_EACH_I_M)
56# else
57# define FB_BOOST_PP_SEQ_FOR_EACH_I_R(r, macro, data, seq) FB_BOOST_PP_SEQ_FOR_EACH_I_R_I(r, macro, data, seq)
58# define FB_BOOST_PP_SEQ_FOR_EACH_I_R_I(r, macro, data, seq) FB_BOOST_PP_FOR_ ## r((macro, data, seq (nil), 0), FB_BOOST_PP_SEQ_FOR_EACH_I_P, FB_BOOST_PP_SEQ_FOR_EACH_I_O, FB_BOOST_PP_SEQ_FOR_EACH_I_M)
59# endif
60#
61# endif
62