blob: b6ba7ed7c39b46d85f84b7dc4a4206791ae61860 [file] [log] [blame]
/*=============================================================================
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_STATEMENT_WHILE_HPP
#define PHOENIX_STATEMENT_WHILE_HPP
#include <boost/spirit/home/phoenix/core/composite.hpp>
#include <boost/spirit/home/phoenix/core/compose.hpp>
namespace boost { namespace phoenix
{
struct while_eval
{
template <typename Env, typename Cond, typename Do>
struct result
{
typedef void type;
};
template <typename RT, typename Env, typename Cond, typename Do>
static void
eval(Env const& env, Cond& cond, Do& do_)
{
while (cond.eval(env))
do_.eval(env);
}
};
template <typename Cond>
struct while_gen
{
while_gen(Cond const& cond)
: cond(cond) {}
template <typename Do>
actor<typename as_composite<while_eval, Cond, Do>::type>
operator[](Do const& do_) const
{
return compose<while_eval>(cond, do_);
}
Cond cond;
};
template <typename Cond>
inline while_gen<Cond>
while_(Cond const& cond)
{
return while_gen<Cond>(cond);
}
}}
#endif