Chris@16: 
Chris@16: #if !BOOST_PHOENIX_IS_ITERATING
Chris@16: 
Chris@16: #ifndef BOOST_PHOENIX_CORE_EXPRESSION_HPP
Chris@16: #define BOOST_PHOENIX_CORE_EXPRESSION_HPP
Chris@16: 
Chris@16: #include <boost/phoenix/core/limits.hpp>
Chris@16: #include <boost/call_traits.hpp>
Chris@16: #include <boost/fusion/sequence/intrinsic/at.hpp>
Chris@16: #include <boost/phoenix/core/as_actor.hpp>
Chris@16: #include <boost/phoenix/core/detail/expression.hpp>
Chris@16: #include <boost/phoenix/core/domain.hpp>
Chris@16: #include <boost/phoenix/support/iterate.hpp>
Chris@16: #include <boost/preprocessor/comparison/equal.hpp>
Chris@16: #include <boost/proto/domain.hpp>
Chris@16: #include <boost/proto/make_expr.hpp>
Chris@16: #include <boost/proto/transform/pass_through.hpp>
Chris@16: 
Chris@16: #if !defined(BOOST_PHOENIX_DONT_USE_PREPROCESSED_FILES)
Chris@16: 
Chris@16: #include <boost/phoenix/core/preprocessed/expression.hpp>
Chris@16: 
Chris@16: #else
Chris@16: 
Chris@16: #if defined(__WAVE__) && defined(BOOST_PHOENIX_CREATE_PREPROCESSED_FILES)
Chris@16: #pragma wave option(preserve: 2, line: 0, output: "preprocessed/expression_" BOOST_PHOENIX_LIMIT_STR ".hpp")
Chris@16: #endif
Chris@16: 
Chris@16: /*=============================================================================
Chris@16:     Copyright (c) 2005-2010 Joel de Guzman
Chris@16:     Copyright (c) 2010 Eric Niebler
Chris@16:     Copyright (c) 2010 Thomas Heller
Chris@16: 
Chris@16:     Distributed under the Boost Software License, Version 1.0. (See accompanying 
Chris@16:     file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: ==============================================================================*/
Chris@16: 
Chris@16: #if defined(__WAVE__) && defined(BOOST_PHOENIX_CREATE_PREPROCESSED_FILES)
Chris@16: #pragma wave option(preserve: 1)
Chris@16: #endif
Chris@16: 
Chris@16: namespace boost { namespace phoenix
Chris@16: {
Chris@16:     template <typename Expr> struct actor;
Chris@16:     
Chris@16:     template <
Chris@16:         template <typename> class Actor
Chris@16:       , typename Tag
Chris@16:       , BOOST_PHOENIX_typename_A_void(BOOST_PHOENIX_COMPOSITE_LIMIT)
Chris@16:       , typename Dummy = void>
Chris@16:     struct expr_ext;
Chris@16: 
Chris@16:     template <
Chris@16:         typename Tag
Chris@16:       , BOOST_PHOENIX_typename_A_void(BOOST_PHOENIX_COMPOSITE_LIMIT)
Chris@16:       , typename Dummy = void
Chris@16:     >
Chris@16:     struct expr : expr_ext<actor, Tag, BOOST_PHOENIX_A(BOOST_PHOENIX_COMPOSITE_LIMIT)> {};
Chris@16: 
Chris@16: #define M0(Z, N, D)                                                             \
Chris@16:     BOOST_PP_COMMA_IF(N)                                                        \
Chris@16:     typename proto::detail::uncvref<typename call_traits<BOOST_PP_CAT(A, N)>::value_type>::type
Chris@16: 
Chris@16: #define M1(Z, N, D)                                                             \
Chris@16:     BOOST_PP_COMMA_IF(N) typename call_traits<BOOST_PP_CAT(A, N)>::param_type BOOST_PP_CAT(a, N)
Chris@16: 
Chris@16: #define BOOST_PHOENIX_ITERATION_PARAMS                                          \
Chris@16:     (3, (1, BOOST_PHOENIX_COMPOSITE_LIMIT,                                      \
Chris@16:     <boost/phoenix/core/expression.hpp>))                                       \
Chris@16: /**/
Chris@16:     #include BOOST_PHOENIX_ITERATE()
Chris@16: 
Chris@16: #undef M0
Chris@16: #undef M1
Chris@16: 
Chris@16: }}
Chris@16: 
Chris@16: #if defined(__WAVE__) && defined(BOOST_PHOENIX_CREATE_PREPROCESSED_FILES)
Chris@16: #pragma wave option(output: null)
Chris@16: #endif
Chris@16: 
Chris@16: #endif // PHOENIX_DONT_USE_PREPROCESSED_FILES
Chris@16: 
Chris@16: #endif
Chris@16: 
Chris@16: #else
Chris@16:     template <template <typename> class Actor, typename Tag, BOOST_PHOENIX_typename_A>
Chris@16:     struct expr_ext<Actor, Tag, BOOST_PHOENIX_A>
Chris@16:         : proto::transform<expr_ext<Actor, Tag, BOOST_PHOENIX_A>, int>
Chris@16:     {
Chris@16:         typedef
Chris@16:             typename proto::result_of::make_expr<
Chris@16:                 Tag
Chris@101:               , phoenix_default_domain //proto::basic_default_domain
Chris@16:               , BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, M0, _)
Chris@16:             >::type
Chris@16:             base_type;
Chris@16: 
Chris@16:         typedef Actor<base_type> type;
Chris@16: 
Chris@16:         typedef
Chris@16:             typename proto::nary_expr<Tag, BOOST_PHOENIX_A>::proto_grammar
Chris@16:             proto_grammar;
Chris@16:         
Chris@16:         static type make(BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, M1, _))
Chris@101:       { //?? actor or Actor??
Chris@101:         //Actor<base_type> const e =
Chris@101:                 actor<base_type> const e =
Chris@16:                 {
Chris@16:                     proto::make_expr<
Chris@16:                         Tag
Chris@101:                       , phoenix_default_domain // proto::basic_default_domain
Chris@16:                     >(BOOST_PHOENIX_a)
Chris@16:                 };
Chris@16:             return e;
Chris@16:         }
Chris@16: 
Chris@16:         template<typename Expr, typename State, typename Data>
Chris@16:         struct impl
Chris@16:           : proto::pass_through<expr_ext>::template impl<Expr, State, Data>
Chris@16:         {};
Chris@16:         
Chris@16:         typedef Tag proto_tag;
Chris@16:     #define BOOST_PHOENIX_ENUM_CHILDREN(_, N, __)                               \
Chris@16:         typedef BOOST_PP_CAT(A, N) BOOST_PP_CAT(proto_child, N);                \
Chris@16:     /**/
Chris@16:         BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_ENUM_CHILDREN, _)
Chris@16:     #undef BOOST_PHOENIX_ENUM_CHILDREN
Chris@16:     };
Chris@16: 
Chris@16: #endif