Chris@16: 
Chris@16: #ifndef BOOST_MPL_TRANSFORM_HPP_INCLUDED
Chris@16: #define BOOST_MPL_TRANSFORM_HPP_INCLUDED
Chris@16: 
Chris@16: // Copyright Aleksey Gurtovoy 2000-2004
Chris@16: // Copyright David Abrahams 2003-2004
Chris@16: //
Chris@16: // Distributed under the Boost Software License, Version 1.0. 
Chris@16: // (See accompanying file LICENSE_1_0.txt or copy at 
Chris@16: // http://www.boost.org/LICENSE_1_0.txt)
Chris@16: //
Chris@16: // See http://www.boost.org/libs/mpl for documentation.
Chris@16: 
Chris@101: // $Id$
Chris@101: // $Date$
Chris@101: // $Revision$
Chris@16: 
Chris@16: #include <boost/mpl/fold.hpp>
Chris@16: #include <boost/mpl/reverse_fold.hpp>
Chris@16: #include <boost/mpl/pair_view.hpp>
Chris@16: #include <boost/mpl/is_sequence.hpp>
Chris@16: #include <boost/mpl/eval_if.hpp>
Chris@16: #include <boost/mpl/lambda.hpp>
Chris@16: #include <boost/mpl/bind.hpp>
Chris@16: #include <boost/mpl/or.hpp>
Chris@16: #include <boost/mpl/not.hpp>
Chris@16: #include <boost/mpl/aux_/na.hpp>
Chris@16: #include <boost/mpl/aux_/inserter_algorithm.hpp>
Chris@16: 
Chris@16: namespace boost { namespace mpl {
Chris@16: 
Chris@16: namespace aux { 
Chris@16: 
Chris@16: template< 
Chris@16:       typename Seq
Chris@16:     , typename Op
Chris@16:     , typename In
Chris@16:     >
Chris@16: struct transform1_impl
Chris@16:     : fold< 
Chris@16:           Seq
Chris@16:         , typename In::state
Chris@16:         , bind2< typename lambda< typename In::operation >::type
Chris@16:             , _1
Chris@16:             , bind1< typename lambda<Op>::type, _2>
Chris@16:             > 
Chris@16:         >
Chris@16: {
Chris@16: };
Chris@16: 
Chris@16: template< 
Chris@16:       typename Seq
Chris@16:     , typename Op
Chris@16:     , typename In
Chris@16:     >
Chris@16: struct reverse_transform1_impl
Chris@16:     : reverse_fold< 
Chris@16:           Seq
Chris@16:         , typename In::state
Chris@16:         , bind2< typename lambda< typename In::operation >::type
Chris@16:             , _1
Chris@16:             , bind1< typename lambda<Op>::type, _2>
Chris@16:             > 
Chris@16:         >
Chris@16: {
Chris@16: };
Chris@16: 
Chris@16: template< 
Chris@16:       typename Seq1
Chris@16:     , typename Seq2
Chris@16:     , typename Op
Chris@16:     , typename In
Chris@16:     >
Chris@16: struct transform2_impl
Chris@16:     : fold< 
Chris@16:           pair_view<Seq1,Seq2>
Chris@16:         , typename In::state
Chris@16:         , bind2< typename lambda< typename In::operation >::type
Chris@16:             , _1
Chris@16:             , bind2<
Chris@16:                   typename lambda<Op>::type
Chris@16:                 , bind1<first<>,_2>
Chris@16:                 , bind1<second<>,_2>
Chris@16:                 >
Chris@16:             > 
Chris@16:         >
Chris@16: {
Chris@16: };
Chris@16: 
Chris@16: template< 
Chris@16:       typename Seq1
Chris@16:     , typename Seq2
Chris@16:     , typename Op
Chris@16:     , typename In
Chris@16:     >
Chris@16: struct reverse_transform2_impl
Chris@16:     : reverse_fold< 
Chris@16:           pair_view<Seq1,Seq2>
Chris@16:         , typename In::state
Chris@16:         , bind2< typename lambda< typename In::operation >::type
Chris@16:             , _1
Chris@16:             , bind2< typename lambda< Op >::type
Chris@16:                 , bind1<first<>,_2>
Chris@16:                 , bind1<second<>,_2>
Chris@16:                 >
Chris@16:             > 
Chris@16:         >
Chris@16: {
Chris@16: };
Chris@16: 
Chris@16: } // namespace aux 
Chris@16: 
Chris@16: BOOST_MPL_AUX_INSERTER_ALGORITHM_DEF(3, transform1)                    
Chris@16: BOOST_MPL_AUX_INSERTER_ALGORITHM_DEF(4, transform2)
Chris@16:     
Chris@16: #define AUX778076_TRANSFORM_DEF(name)                                   \
Chris@16: template<                                                               \
Chris@16:       typename BOOST_MPL_AUX_NA_PARAM(Seq1)                             \
Chris@16:     , typename BOOST_MPL_AUX_NA_PARAM(Seq2OrOperation)                  \
Chris@16:     , typename BOOST_MPL_AUX_NA_PARAM(OperationOrInserter)              \
Chris@16:     , typename BOOST_MPL_AUX_NA_PARAM(Inserter)                         \
Chris@16:     >                                                                   \
Chris@16: struct name                                                             \
Chris@16: {                                                                       \
Chris@16:     typedef typename eval_if<                                           \
Chris@16:           or_<                                                          \
Chris@16:               is_na<OperationOrInserter>                                \
Chris@16:             , is_lambda_expression< Seq2OrOperation >                   \
Chris@16:             , not_< is_sequence<Seq2OrOperation> >                      \
Chris@16:             >                                                           \
Chris@16:         , name##1<Seq1,Seq2OrOperation,OperationOrInserter>             \
Chris@16:         , name##2<Seq1,Seq2OrOperation,OperationOrInserter,Inserter>    \
Chris@16:         >::type type;                                                   \
Chris@16: };                                                                      \
Chris@16: BOOST_MPL_AUX_NA_SPEC(4, name)                                          \
Chris@16: /**/
Chris@16: 
Chris@16: AUX778076_TRANSFORM_DEF(transform)
Chris@16: AUX778076_TRANSFORM_DEF(reverse_transform)
Chris@16: 
Chris@16: #undef AUX778076_TRANSFORM_DEF
Chris@16: 
Chris@16: }}
Chris@16: 
Chris@16: #endif // BOOST_MPL_TRANSFORM_HPP_INCLUDED