You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and dots ('.'), can be up to 35 characters long. Letters must be lowercase.
64 lines
2.0 KiB
64 lines
2.0 KiB
/*============================================================================== |
|
Copyright (c) 2001-2010 Joel de Guzman |
|
Copyright (c) 2010 Thomas Heller |
|
|
|
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 BOOST_PHOENIX_OBJECT_CONST_CAST_HPP |
|
#define BOOST_PHOENIX_OBJECT_CONST_CAST_HPP |
|
|
|
#include <boost/phoenix/core/limits.hpp> |
|
#include <boost/phoenix/core/call.hpp> |
|
#include <boost/phoenix/core/expression.hpp> |
|
#include <boost/phoenix/core/meta_grammar.hpp> |
|
#include <boost/phoenix/object/detail/target.hpp> |
|
#include <boost/proto/transform/lazy.hpp> |
|
|
|
BOOST_PHOENIX_DEFINE_EXPRESSION( |
|
(boost)(phoenix)(const_cast_) |
|
, (proto::terminal<detail::target<proto::_> >) |
|
(meta_grammar) |
|
) |
|
|
|
namespace boost { namespace phoenix |
|
{ |
|
struct const_cast_eval |
|
{ |
|
template <typename Sig> |
|
struct result; |
|
|
|
template <typename This, typename Target, typename Source, typename Context> |
|
struct result<This(Target const &, Source const&, Context)> |
|
: detail::result_of::target<Target> |
|
{}; |
|
|
|
template <typename Target, typename Source, typename Context> |
|
typename detail::result_of::target<Target>::type |
|
operator()(Target, Source const& u, Context const& ctx) const |
|
{ |
|
return |
|
const_cast< |
|
typename detail::result_of::target<Target>::type |
|
>(boost::phoenix::eval(u, ctx)); |
|
} |
|
}; |
|
|
|
template <typename Dummy> |
|
struct default_actions::when<rule::const_cast_, Dummy> |
|
: call<const_cast_eval, Dummy> |
|
{}; |
|
|
|
template <typename T, typename U> |
|
inline |
|
typename expression::const_cast_<detail::target<T>, U>::type const |
|
const_cast_(U const& u) |
|
{ |
|
return |
|
expression:: |
|
const_cast_<detail::target<T>, U>:: |
|
make(detail::target<T>(), u); |
|
} |
|
}} |
|
|
|
#endif
|
|
|