/*============================================================================= | |
Copyright (c) 2001-2007 Joel de Guzman | |
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) | |
==============================================================================*/ | |
#ifndef PHOENIX_OPERATOR_DETAIL_UNARY_EVAL_HPP | |
#define PHOENIX_OPERATOR_DETAIL_UNARY_EVAL_HPP | |
#include <boost/mpl/eval_if.hpp> | |
#include <boost/spirit/home/phoenix/core/compose.hpp> | |
#define PHOENIX_UNARY_EVAL(eval_name, op_result, expr) \ | |
struct eval_name \ | |
{ \ | |
template <typename Env, typename A0> \ | |
struct result \ | |
{ \ | |
typedef typename A0::template result<Env>::type x_type; \ | |
\ | |
typedef typename \ | |
mpl::eval_if< \ | |
is_actor<x_type> \ | |
, re_curry<eval_name, x_type> \ | |
, op_result<x_type> \ | |
>::type \ | |
type; \ | |
}; \ | |
\ | |
template <typename RT, typename Env, typename A0> \ | |
static RT \ | |
eval(Env const& env, A0& a0) \ | |
{ \ | |
return expr; \ | |
} \ | |
}; | |
#endif | |