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_OBJECT_DELETE_HPP
Chris@16: #define PHOENIX_OBJECT_DELETE_HPP
Chris@16: 
Chris@16: #include <boost/spirit/home/phoenix/core/compose.hpp>
Chris@16: 
Chris@16: namespace boost { namespace phoenix
Chris@16: {
Chris@16:     namespace impl
Chris@16:     {
Chris@16:         struct delete_eval
Chris@16:         {
Chris@16:             template <typename Env, typename P>
Chris@16:             struct result
Chris@16:             {
Chris@16:                 typedef void type;
Chris@16:             };
Chris@16: 
Chris@16:             template <typename Args, typename Env, typename P>
Chris@16:             static void
Chris@16:             eval(Env const& env, P& p)
Chris@16:             {
Chris@16:                 delete p.eval(env);
Chris@16:             }
Chris@16:         };
Chris@16:     }
Chris@16: 
Chris@16:     template <typename P>
Chris@16:     inline actor<typename as_composite<impl::delete_eval, P>::type>
Chris@16:     delete_(P const& p)
Chris@16:     {
Chris@16:         return compose<impl::delete_eval>(p);
Chris@16:     }
Chris@16: }}
Chris@16: 
Chris@16: #endif