You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and dots ('.'), can be up to 35 characters long. Letters must be lowercase.
365 lines
8.8 KiB
365 lines
8.8 KiB
|
|
// NO INCLUDE GUARDS, THE HEADER IS INTENDED FOR MULTIPLE INCLUSION |
|
|
|
#if !defined(BOOST_PP_IS_ITERATING) |
|
|
|
// Copyright Aleksey Gurtovoy 2000-2004 |
|
// |
|
// Distributed under the Boost Software License, Version 1.0. |
|
// (See accompanying file LICENSE_1_0.txt or copy at |
|
// http://www.boost.org/LICENSE_1_0.txt) |
|
// |
|
// See http://www.boost.org/libs/mpl for documentation. |
|
|
|
// $Id: fold_impl_body.hpp 49267 2008-10-11 06:19:02Z agurtovoy $ |
|
// $Date: 2008-10-11 02:19:02 -0400 (Sat, 11 Oct 2008) $ |
|
// $Revision: 49267 $ |
|
|
|
# include <boost/mpl/limits/unrolling.hpp> |
|
# include <boost/mpl/aux_/preprocessor/repeat.hpp> |
|
# include <boost/mpl/aux_/config/workaround.hpp> |
|
# include <boost/mpl/aux_/config/ctps.hpp> |
|
# include <boost/mpl/aux_/nttp_decl.hpp> |
|
# include <boost/mpl/aux_/config/eti.hpp> |
|
|
|
# include <boost/preprocessor/iterate.hpp> |
|
# include <boost/preprocessor/dec.hpp> |
|
# include <boost/preprocessor/cat.hpp> |
|
|
|
// local macros, #undef-ined at the end of the header |
|
|
|
# define AUX778076_ITER_FOLD_STEP(unused, i, unused2) \ |
|
typedef typename apply2< \ |
|
ForwardOp \ |
|
, BOOST_PP_CAT(state,i) \ |
|
, AUX778076_FOLD_IMPL_OP(BOOST_PP_CAT(iter,i)) \ |
|
>::type BOOST_PP_CAT(state,BOOST_PP_INC(i)); \ |
|
typedef typename mpl::next<BOOST_PP_CAT(iter,i)>::type \ |
|
BOOST_PP_CAT(iter,BOOST_PP_INC(i)); \ |
|
/**/ |
|
|
|
# define AUX778076_FOLD_IMPL_NAME \ |
|
BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_impl) \ |
|
/**/ |
|
|
|
# define AUX778076_FOLD_CHUNK_NAME \ |
|
BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_chunk) \ |
|
/**/ |
|
|
|
namespace boost { namespace mpl { namespace aux { |
|
|
|
/// forward declaration |
|
template< |
|
BOOST_MPL_AUX_NTTP_DECL(int, N) |
|
, typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME; |
|
|
|
#if !defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION) |
|
|
|
# if !BOOST_WORKAROUND(__BORLANDC__, < 0x600) |
|
|
|
# define BOOST_PP_ITERATION_PARAMS_1 \ |
|
(3,(0, BOOST_MPL_LIMIT_UNROLLING, <boost/mpl/aux_/fold_impl_body.hpp>)) |
|
# include BOOST_PP_ITERATE() |
|
|
|
// implementation for N that exceeds BOOST_MPL_LIMIT_UNROLLING |
|
template< |
|
BOOST_MPL_AUX_NTTP_DECL(int, N) |
|
, typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME |
|
{ |
|
typedef AUX778076_FOLD_IMPL_NAME< |
|
BOOST_MPL_LIMIT_UNROLLING |
|
, First |
|
, Last |
|
, State |
|
, ForwardOp |
|
> chunk_; |
|
|
|
typedef AUX778076_FOLD_IMPL_NAME< |
|
( (N - BOOST_MPL_LIMIT_UNROLLING) < 0 ? 0 : N - BOOST_MPL_LIMIT_UNROLLING ) |
|
, typename chunk_::iterator |
|
, Last |
|
, typename chunk_::state |
|
, ForwardOp |
|
> res_; |
|
|
|
typedef typename res_::state state; |
|
typedef typename res_::iterator iterator; |
|
}; |
|
|
|
// fallback implementation for sequences of unknown size |
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME<-1,First,Last,State,ForwardOp> |
|
: AUX778076_FOLD_IMPL_NAME< |
|
-1 |
|
, typename mpl::next<First>::type |
|
, Last |
|
, typename apply2<ForwardOp,State,AUX778076_FOLD_IMPL_OP(First)>::type |
|
, ForwardOp |
|
> |
|
{ |
|
}; |
|
|
|
template< |
|
typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME<-1,Last,Last,State,ForwardOp> |
|
{ |
|
typedef State state; |
|
typedef Last iterator; |
|
}; |
|
|
|
# else // BOOST_WORKAROUND(__BORLANDC__, < 0x600) |
|
|
|
// Borland have some serious problems with the unrolled version, so |
|
// we always use a basic implementation |
|
template< |
|
BOOST_MPL_AUX_NTTP_DECL(int, N) |
|
, typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME |
|
{ |
|
typedef AUX778076_FOLD_IMPL_NAME< |
|
-1 |
|
, typename mpl::next<First>::type |
|
, Last |
|
, typename apply2<ForwardOp,State,AUX778076_FOLD_IMPL_OP(First)>::type |
|
, ForwardOp |
|
> res_; |
|
|
|
typedef typename res_::state state; |
|
typedef typename res_::iterator iterator; |
|
typedef state type; |
|
}; |
|
|
|
template< |
|
BOOST_MPL_AUX_NTTP_DECL(int, N) |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME<N,Last,Last,State,ForwardOp > |
|
{ |
|
typedef State state; |
|
typedef Last iterator; |
|
typedef state type; |
|
}; |
|
|
|
# endif // BOOST_WORKAROUND(__BORLANDC__, < 0x600) |
|
|
|
#else // BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION |
|
|
|
template< BOOST_MPL_AUX_NTTP_DECL(int, N) > |
|
struct AUX778076_FOLD_CHUNK_NAME; |
|
|
|
# define BOOST_PP_ITERATION_PARAMS_1 \ |
|
(3,(0, BOOST_MPL_LIMIT_UNROLLING, <boost/mpl/aux_/fold_impl_body.hpp>)) |
|
# include BOOST_PP_ITERATE() |
|
|
|
// implementation for N that exceeds BOOST_MPL_LIMIT_UNROLLING |
|
template< BOOST_MPL_AUX_NTTP_DECL(int, N) > |
|
struct AUX778076_FOLD_CHUNK_NAME |
|
{ |
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct result_ |
|
{ |
|
typedef AUX778076_FOLD_IMPL_NAME< |
|
BOOST_MPL_LIMIT_UNROLLING |
|
, First |
|
, Last |
|
, State |
|
, ForwardOp |
|
> chunk_; |
|
|
|
typedef AUX778076_FOLD_IMPL_NAME< |
|
( (N - BOOST_MPL_LIMIT_UNROLLING) < 0 ? 0 : N - BOOST_MPL_LIMIT_UNROLLING ) |
|
, typename chunk_::iterator |
|
, Last |
|
, typename chunk_::state |
|
, ForwardOp |
|
> res_; |
|
|
|
typedef typename res_::state state; |
|
typedef typename res_::iterator iterator; |
|
}; |
|
}; |
|
|
|
// fallback implementation for sequences of unknown size |
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_step); |
|
|
|
template< |
|
typename Last |
|
, typename State |
|
> |
|
struct BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_null_step) |
|
{ |
|
typedef Last iterator; |
|
typedef State state; |
|
}; |
|
|
|
template<> |
|
struct AUX778076_FOLD_CHUNK_NAME<-1> |
|
{ |
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct result_ |
|
{ |
|
typedef typename if_< |
|
typename is_same<First,Last>::type |
|
, BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_null_step)<Last,State> |
|
, BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_step)<First,Last,State,ForwardOp> |
|
>::type res_; |
|
|
|
typedef typename res_::state state; |
|
typedef typename res_::iterator iterator; |
|
}; |
|
|
|
#if defined(BOOST_MPL_CFG_MSVC_60_ETI_BUG) |
|
/// ETI workaround |
|
template<> struct result_<int,int,int,int> |
|
{ |
|
typedef int state; |
|
typedef int iterator; |
|
}; |
|
#endif |
|
}; |
|
|
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct BOOST_PP_CAT(AUX778076_FOLD_IMPL_NAME_PREFIX,_step) |
|
{ |
|
// can't inherit here - it breaks MSVC 7.0 |
|
typedef AUX778076_FOLD_CHUNK_NAME<-1>::template result_< |
|
typename mpl::next<First>::type |
|
, Last |
|
, typename apply2<ForwardOp,State,AUX778076_FOLD_IMPL_OP(First)>::type |
|
, ForwardOp |
|
> chunk_; |
|
|
|
typedef typename chunk_::state state; |
|
typedef typename chunk_::iterator iterator; |
|
}; |
|
|
|
template< |
|
BOOST_MPL_AUX_NTTP_DECL(int, N) |
|
, typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME |
|
: AUX778076_FOLD_CHUNK_NAME<N> |
|
::template result_<First,Last,State,ForwardOp> |
|
{ |
|
}; |
|
|
|
#endif // BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION |
|
|
|
}}} |
|
|
|
# undef AUX778076_FOLD_IMPL_NAME |
|
# undef AUX778076_FOLD_CHUNK_NAME |
|
# undef AUX778076_ITER_FOLD_STEP |
|
|
|
#undef AUX778076_FOLD_IMPL_OP |
|
#undef AUX778076_FOLD_IMPL_NAME_PREFIX |
|
|
|
///// iteration |
|
|
|
#else |
|
|
|
# define n_ BOOST_PP_FRAME_ITERATION(1) |
|
|
|
#if !defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION) |
|
|
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct AUX778076_FOLD_IMPL_NAME<n_,First,Last,State,ForwardOp> |
|
{ |
|
typedef First iter0; |
|
typedef State state0; |
|
|
|
BOOST_MPL_PP_REPEAT(n_, AUX778076_ITER_FOLD_STEP, unused) |
|
|
|
typedef BOOST_PP_CAT(state,n_) state; |
|
typedef BOOST_PP_CAT(iter,n_) iterator; |
|
}; |
|
|
|
#else |
|
|
|
template<> struct AUX778076_FOLD_CHUNK_NAME<n_> |
|
{ |
|
template< |
|
typename First |
|
, typename Last |
|
, typename State |
|
, typename ForwardOp |
|
> |
|
struct result_ |
|
{ |
|
typedef First iter0; |
|
typedef State state0; |
|
|
|
BOOST_MPL_PP_REPEAT(n_, AUX778076_ITER_FOLD_STEP, unused) |
|
|
|
typedef BOOST_PP_CAT(state,n_) state; |
|
typedef BOOST_PP_CAT(iter,n_) iterator; |
|
}; |
|
|
|
#if defined(BOOST_MPL_CFG_MSVC_60_ETI_BUG) |
|
/// ETI workaround |
|
template<> struct result_<int,int,int,int> |
|
{ |
|
typedef int state; |
|
typedef int iterator; |
|
}; |
|
#endif |
|
}; |
|
|
|
#endif // BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION |
|
|
|
# undef n_ |
|
|
|
#endif // BOOST_PP_IS_ITERATING
|
|
|