280 lines
21 KiB
Plaintext
280 lines
21 KiB
Plaintext
|
///////////////////////////////////////////////////////////////////////////////
|
||
|
|
/// \file default_eval.hpp
|
||
|
|
/// Contains specializations of the default_eval\<\> class template.
|
||
|
|
//
|
||
|
|
// Copyright 2008 Eric Niebler. 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)
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 3>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 4>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 5>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 6>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 5>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 7>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 5>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 6>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 8>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 5>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 6>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 7>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 9>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 5>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 6>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 7>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 8>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context) , proto::eval(proto::child_c< 8>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context) , proto::eval(proto::child_c< 8>( expr), context));
|
||
|
|
}
|
||
|
|
};
|
||
|
|
template<typename Expr, typename Context>
|
||
|
|
struct default_eval<Expr, Context, proto::tag::function, 10>
|
||
|
|
{
|
||
|
|
typedef
|
||
|
|
typename proto::detail::result_of_fixup<
|
||
|
|
typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 0>::type >::type , Context >::type
|
||
|
|
>::type
|
||
|
|
function_type;
|
||
|
|
typedef
|
||
|
|
typename BOOST_PROTO_RESULT_OF<
|
||
|
|
function_type(typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 1>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 2>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 3>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 4>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 5>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 6>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 7>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 8>::type >::type , Context >::type , typename proto::result_of::eval< typename remove_reference< typename proto::result_of::child_c< Expr, 9>::type >::type , Context >::type)
|
||
|
|
>::type
|
||
|
|
result_type;
|
||
|
|
result_type operator ()(Expr &expr, Context &context) const
|
||
|
|
{
|
||
|
|
return this->invoke(expr, context, is_member_function_pointer<function_type>());
|
||
|
|
}
|
||
|
|
private:
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::false_) const
|
||
|
|
{
|
||
|
|
return proto::eval(proto::child_c< 0>( expr), context)(
|
||
|
|
proto::eval(proto::child_c< 1>( expr), context) , proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context) , proto::eval(proto::child_c< 8>( expr), context) , proto::eval(proto::child_c< 9>( expr), context)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
result_type invoke(Expr &expr, Context &context, mpl::true_) const
|
||
|
|
{
|
||
|
|
BOOST_PROTO_USE_GET_POINTER();
|
||
|
|
typedef typename detail::class_member_traits<function_type>::class_type class_type;
|
||
|
|
return (
|
||
|
|
BOOST_PROTO_GET_POINTER(class_type, (proto::eval(proto::child_c< 1>( expr), context))) ->*
|
||
|
|
proto::eval(proto::child_c< 0>( expr), context)
|
||
|
|
)(proto::eval(proto::child_c< 2>( expr), context) , proto::eval(proto::child_c< 3>( expr), context) , proto::eval(proto::child_c< 4>( expr), context) , proto::eval(proto::child_c< 5>( expr), context) , proto::eval(proto::child_c< 6>( expr), context) , proto::eval(proto::child_c< 7>( expr), context) , proto::eval(proto::child_c< 8>( expr), context) , proto::eval(proto::child_c< 9>( expr), context));
|
||
|
|
}
|
||
|
|
};
|