| /*============================================================================= |
| 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_FOR_HPP |
| #define PHOENIX_STATEMENT_FOR_HPP |
| |
| #include <boost/spirit/home/phoenix/core/composite.hpp> |
| #include <boost/spirit/home/phoenix/core/compose.hpp> |
| |
| namespace boost { namespace phoenix |
| { |
| struct for_eval |
| { |
| template < |
| typename Env |
| , typename Init, typename Cond, typename Step, typename Do> |
| struct result |
| { |
| typedef void type; |
| }; |
| |
| template < |
| typename RT, typename Env |
| , typename Init, typename Cond, typename Step, typename Do> |
| static void |
| eval( |
| Env const& env |
| , Init& init, Cond& cond, Step& step, Do& do_) |
| { |
| for (init.eval(env); cond.eval(env); step.eval(env)) |
| do_.eval(env); |
| } |
| }; |
| |
| template <typename Init, typename Cond, typename Step> |
| struct for_gen |
| { |
| for_gen(Init const& init, Cond const& cond, Step const& step) |
| : init(init), cond(cond), step(step) {} |
| |
| template <typename Do> |
| actor<typename as_composite<for_eval, Init, Cond, Step, Do>::type> |
| operator[](Do const& do_) const |
| { |
| return compose<for_eval>(init, cond, step, do_); |
| } |
| |
| Init init; |
| Cond cond; |
| Step step; |
| }; |
| |
| template <typename Init, typename Cond, typename Step> |
| inline for_gen<Init, Cond, Step> |
| for_(Init const& init, Cond const& cond, Step const& step) |
| { |
| return for_gen<Init, Cond, Step>(init, cond, step); |
| } |
| }} |
| |
| #endif |