Chris@16: #if !defined(BOOST_PROTO_DONT_USE_PREPROCESSED_FILES)
Chris@16: 
Chris@16:     #include <boost/proto/context/detail/preprocessed/default_eval.hpp>
Chris@16: 
Chris@16: #elif !defined(BOOST_PP_IS_ITERATING)
Chris@16: 
Chris@16:     #define BOOST_PROTO_DEFAULT_EVAL_SHIFTED(Z, M, DATA)                                            \
Chris@16:         BOOST_PROTO_DEFAULT_EVAL(Z, BOOST_PP_ADD(M, 2), DATA)                                       \
Chris@16:         /**/
Chris@16: 
Chris@16:     #if defined(__WAVE__) && defined(BOOST_PROTO_CREATE_PREPROCESSED_FILES)
Chris@16:         #pragma wave option(preserve: 2, line: 0, output: "preprocessed/default_eval.hpp")
Chris@16:     #endif
Chris@16: 
Chris@16:     ///////////////////////////////////////////////////////////////////////////////
Chris@16:     /// \file default_eval.hpp
Chris@16:     /// Contains specializations of the default_eval\<\> class template.
Chris@16:     //
Chris@16:     //  Copyright 2008 Eric Niebler. Distributed under the Boost
Chris@16:     //  Software License, Version 1.0. (See accompanying file
Chris@16:     //  LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: 
Chris@16:     #if defined(__WAVE__) && defined(BOOST_PROTO_CREATE_PREPROCESSED_FILES)
Chris@16:         #pragma wave option(preserve: 1)
Chris@16:     #endif
Chris@16: 
Chris@16:     #define BOOST_PP_ITERATION_PARAMS_1                                                             \
Chris@16:         (3, (3, BOOST_PROTO_MAX_ARITY, <boost/proto/context/detail/default_eval.hpp>))
Chris@16:     #include BOOST_PP_ITERATE()
Chris@16: 
Chris@16:     #if defined(__WAVE__) && defined(BOOST_PROTO_CREATE_PREPROCESSED_FILES)
Chris@16:         #pragma wave option(output: null)
Chris@16:     #endif
Chris@16: 
Chris@16:     #undef BOOST_PROTO_DEFAULT_EVAL_SHIFTED
Chris@16: 
Chris@16: #else
Chris@16: 
Chris@16:     #define N BOOST_PP_ITERATION()
Chris@16: 
Chris@16:     template<typename Expr, typename Context>
Chris@16:     struct default_eval<Expr, Context, proto::tag::function, N>
Chris@16:     {
Chris@16:         typedef
Chris@16:             typename proto::detail::result_of_fixup<
Chris@16:                 BOOST_PROTO_DEFAULT_EVAL_TYPE(~, 0, Expr)
Chris@16:             >::type
Chris@16:         function_type;
Chris@16: 
Chris@16:         typedef
Chris@16:             typename BOOST_PROTO_RESULT_OF<
Chris@16:                 function_type(BOOST_PP_ENUM_SHIFTED(N, BOOST_PROTO_DEFAULT_EVAL_TYPE, Expr))
Chris@16:             >::type
Chris@16:         result_type;
Chris@16: 
Chris@16:         result_type operator ()(Expr &expr, Context &context) const
Chris@16:         {
Chris@16:             return this->invoke(expr, context, is_member_function_pointer<function_type>());
Chris@16:         }
Chris@16: 
Chris@16:     private:
Chris@16:         result_type invoke(Expr &expr, Context &context, mpl::false_) const
Chris@16:         {
Chris@16:             return BOOST_PROTO_DEFAULT_EVAL(~, 0, expr)(
Chris@16:                 BOOST_PP_ENUM_SHIFTED(N, BOOST_PROTO_DEFAULT_EVAL, expr)
Chris@16:             );
Chris@16:         }
Chris@16: 
Chris@16:         result_type invoke(Expr &expr, Context &context, mpl::true_) const
Chris@16:         {
Chris@16:             BOOST_PROTO_USE_GET_POINTER();
Chris@16:             typedef typename detail::class_member_traits<function_type>::class_type class_type;
Chris@16:             return (
Chris@16:                 BOOST_PROTO_GET_POINTER(class_type, (BOOST_PROTO_DEFAULT_EVAL(~, 1, expr))) ->*
Chris@16:                 BOOST_PROTO_DEFAULT_EVAL(~, 0, expr)
Chris@16:             )(BOOST_PP_ENUM(BOOST_PP_SUB(N, 2), BOOST_PROTO_DEFAULT_EVAL_SHIFTED, expr));
Chris@16:         }
Chris@16:     };
Chris@16: 
Chris@16:     #undef N
Chris@16: 
Chris@16: #endif