Chris@16: /*=============================================================================
Chris@16:     Copyright (c) 2001-2007 Joel de Guzman
Chris@16: 
Chris@16:     Distributed under the Boost Software License, Version 1.0. (See accompanying 
Chris@16:     file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: ==============================================================================*/
Chris@16: #ifndef PHOENIX_STATEMENT_SEQUENCE_HPP
Chris@16: #define PHOENIX_STATEMENT_SEQUENCE_HPP
Chris@16: 
Chris@16: #include <boost/spirit/home/phoenix/core/composite.hpp>
Chris@16: #include <boost/spirit/home/phoenix/core/compose.hpp>
Chris@16: 
Chris@16: namespace boost { namespace phoenix
Chris@16: {
Chris@16:     struct sequence_eval
Chris@16:     {
Chris@16:         template <typename Env, typename A0, typename A1>
Chris@16:         struct result
Chris@16:         {
Chris@16:             typedef void type;
Chris@16:         };
Chris@16: 
Chris@16:         template <typename RT, typename Env, typename A0, typename A1>
Chris@16:         static void
Chris@16:         eval(Env const& env, A0& a0, A1& a1)
Chris@16:         {
Chris@16:             a0.eval(env);
Chris@16:             a1.eval(env);
Chris@16:         }
Chris@16:     };
Chris@16:     
Chris@16:     namespace detail
Chris@16:     {
Chris@16:         template <typename BaseT0, typename BaseT1>
Chris@16:         struct comma_result
Chris@16:         {
Chris@16:             typedef actor<
Chris@16:                 typename as_composite<
Chris@16:                     sequence_eval
Chris@16:                   , actor<BaseT0>
Chris@16:                   , actor<BaseT1>
Chris@16:                 >::type
Chris@16:             > type;
Chris@16:         };
Chris@16:     }
Chris@16: 
Chris@16:     template <typename BaseT0, typename BaseT1>
Chris@16:     inline typename detail::comma_result<BaseT0, BaseT1>::type
Chris@16:     operator,(actor<BaseT0> const& a0, actor<BaseT1> const& a1)
Chris@16:     {
Chris@16:         return compose<sequence_eval>(a0, a1);
Chris@16:     }
Chris@16: }}
Chris@16: 
Chris@16: #endif