49 lines
1.5 KiB
Plaintext
49 lines
1.5 KiB
Plaintext
|
/*==============================================================================
|
||
|
|
Copyright (c) 2005-2008 Hartmut Kaiser
|
||
|
|
Copyright (c) 2005-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_FUSION_AT_HPP
|
||
|
|
#define BOOST_PHOENIX_FUSION_AT_HPP
|
||
|
|
|
||
|
|
#include <boost/phoenix/core/limits.hpp>
|
||
|
|
#include <boost/fusion/sequence/intrinsic/at_c.hpp>
|
||
|
|
#include <boost/phoenix/core/expression.hpp>
|
||
|
|
#include <boost/phoenix/core/meta_grammar.hpp>
|
||
|
|
#include <boost/type_traits/remove_reference.hpp>
|
||
|
|
|
||
|
|
BOOST_PHOENIX_DEFINE_EXPRESSION(
|
||
|
|
(boost)(phoenix)(at_c)
|
||
|
|
, (proto::terminal<proto::_>)
|
||
|
|
(meta_grammar)
|
||
|
|
)
|
||
|
|
|
||
|
|
namespace boost { namespace phoenix
|
||
|
|
{
|
||
|
|
template <typename Dummy>
|
||
|
|
struct default_actions::when<rule::at_c, Dummy>
|
||
|
|
: proto::call<
|
||
|
|
proto::functional::at(
|
||
|
|
evaluator(proto::_child_c<1>)
|
||
|
|
, proto::_value(proto::_child_c<0>)
|
||
|
|
)
|
||
|
|
>
|
||
|
|
{};
|
||
|
|
|
||
|
|
template <int N, typename Tuple>
|
||
|
|
inline
|
||
|
|
typename expression::at_c<mpl::int_<N>, Tuple>::type const
|
||
|
|
at_c(Tuple const& tuple)
|
||
|
|
{
|
||
|
|
return
|
||
|
|
expression::
|
||
|
|
at_c<mpl::int_<N>, Tuple>::
|
||
|
|
make(mpl::int_<N>(), tuple);
|
||
|
|
}
|
||
|
|
}}
|
||
|
|
|
||
|
|
#endif
|