fusion fold and transform passing refs for lvalues as per result_of protocol

[SVN r38039]
This commit is contained in:
Dan Marsden
2007-06-19 21:30:06 +00:00
parent 0e5cb04b99
commit 09a6da1f80
13 changed files with 157 additions and 40 deletions

View File

@ -13,6 +13,9 @@
#include <boost/fusion/iterator/distance.hpp>
#include <boost/utility/result_of.hpp>
#include <boost/type_traits/add_const.hpp>
#include <boost/type_traits/add_reference.hpp>
namespace boost { namespace fusion {
namespace result_of
{
@ -32,8 +35,11 @@ namespace detail
template <typename Iterator, typename State, typename F>
struct fold_apply
: boost::result_of<F(typename result_of::value_of<Iterator>::type, State)>
{};
{
typedef typename result_of::deref<Iterator>::type dereferenced;
typedef typename add_reference<typename add_const<State>::type>::type lvalue_state;
typedef typename boost::result_of<F(dereferenced, lvalue_state)>::type type;
};
template <typename First, typename Last, typename State, typename F>
struct static_fold;

View File

@ -9,6 +9,7 @@
#include <boost/type_traits/is_convertible.hpp>
#include <boost/mpl/if.hpp>
#include <boost/type_traits/remove_reference.hpp>
namespace boost { namespace fusion { namespace detail
{
@ -43,14 +44,15 @@ namespace boost { namespace fusion { namespace detail
replacer(T const& old_value, T const& new_value)
: old_value(old_value), new_value(new_value) {}
template<typename Params>
template<typename Sig>
struct result;
template <typename U1, typename U2>
struct result<replacer<U1>(U2)>
{
typedef typename remove_reference<U2>::type value;
typedef typename
mpl::if_<is_convertible<T, U2>, U2, U2 const&>::type
mpl::if_<is_convertible<T, value>, value, value const&>::type
type;
};

View File

@ -9,6 +9,7 @@
#include <boost/utility/enable_if.hpp>
#include <boost/mpl/if.hpp>
#include <boost/type_traits/remove_reference.hpp>
namespace boost { namespace fusion { namespace detail
{
@ -49,8 +50,9 @@ namespace boost { namespace fusion { namespace detail
template <typename F1, typename T1, typename U>
struct result<replacer_if<F1, T1>(U)>
{
typedef typename remove_reference<U>::type value;
typedef typename
mpl::if_<is_convertible<T, U>, U, U const&>::type
mpl::if_<is_convertible<T, value>, value, value const&>::type
type;
};

View File

@ -30,7 +30,7 @@ namespace boost { namespace fusion
struct apply
{
typedef typename
result_of::value_of<typename Iterator::first_type>::type
result_of::deref<typename Iterator::first_type>::type
value_type;
typedef detail::apply_transform_result<typename Iterator::transform_type> transform_type;
@ -52,10 +52,10 @@ namespace boost { namespace fusion
struct apply
{
typedef typename
result_of::value_of<typename Iterator::first1_type>::type
result_of::deref<typename Iterator::first1_type>::type
value1_type;
typedef typename
result_of::value_of<typename Iterator::first2_type>::type
result_of::deref<typename Iterator::first2_type>::type
value2_type;
typedef detail::apply_transform_result<typename Iterator::transform_type> transform_type;

View File

@ -11,6 +11,7 @@
#include <boost/fusion/sequence/view/zip_view/zip_view_iterator_fwd.hpp>
#include <boost/fusion/iterator/advance.hpp>
#include <boost/fusion/algorithm/transformation/transform.hpp>
#include <boost/type_traits/remove_reference.hpp>
namespace boost { namespace fusion {
@ -21,13 +22,15 @@ namespace boost { namespace fusion {
template<typename N>
struct poly_advance
{
template<typename T>
template<typename Sig>
struct result;
template<typename N1, typename It>
struct result<poly_advance<N1>(It)>
: result_of::advance<It,N>
{};
{
typedef typename remove_reference<It>::type it;
typedef typename result_of::advance<it,N>::type type;
};
template<typename It>
typename result<poly_advance(It)>::type

View File

@ -16,6 +16,8 @@
#include <boost/mpl/eval_if.hpp>
#include <boost/mpl/identity.hpp>
#include <boost/type_traits/is_same.hpp>
#include <boost/type_traits/remove_reference.hpp>
#include <boost/type_traits/remove_const.hpp>
namespace boost { namespace fusion {
@ -25,15 +27,19 @@ namespace boost { namespace fusion {
{
struct poly_deref
{
template<typename T>
template<typename Sig>
struct result;
template<typename It>
struct result<poly_deref(It)>
: mpl::eval_if<is_same<It, unused_type>,
mpl::identity<unused_type>,
result_of::deref<It> >
{};
{
typedef typename remove_const<
typename remove_reference<It>::type>::type it;
typedef typename mpl::eval_if<is_same<it, unused_type>,
mpl::identity<unused_type>,
result_of::deref<it> >::type type;
};
template<typename It>
typename result<poly_deref(It)>::type

View File

@ -15,6 +15,8 @@
#include <boost/mpl/eval_if.hpp>
#include <boost/mpl/identity.hpp>
#include <boost/type_traits/is_same.hpp>
#include <boost/type_traits/remove_reference.hpp>
#include <boost/type_traits/remove_const.hpp>
namespace boost { namespace fusion {
@ -24,15 +26,19 @@ namespace boost { namespace fusion {
{
struct poly_next
{
template<typename T>
template<typename Sig>
struct result;
template<typename It>
struct result<poly_next(It)>
: mpl::eval_if<is_same<It, unused_type>,
mpl::identity<unused_type>,
result_of::next<It> >
{};
{
typedef typename remove_const<
typename remove_reference<It>::type>::type it;
typedef typename mpl::eval_if<is_same<it, unused_type>,
mpl::identity<unused_type>,
result_of::next<it> >::type type;
};
template<typename It>
typename result<poly_next(It)>::type

View File

@ -15,6 +15,8 @@
#include <boost/mpl/eval_if.hpp>
#include <boost/mpl/identity.hpp>
#include <boost/type_traits/is_same.hpp>
#include <boost/type_traits/remove_reference.hpp>
#include <boost/type_traits/remove_const.hpp>
namespace boost { namespace fusion {
@ -24,15 +26,18 @@ namespace boost { namespace fusion {
{
struct poly_prior
{
template<typename T>
template<typename Sig>
struct result;
template<typename It>
struct result<poly_prior(It)>
: mpl::eval_if<is_same<It, unused_type>,
mpl::identity<unused_type>,
result_of::prior<It> >
{};
{
typedef typename remove_const<
typename remove_reference<It>::type>::type it;
typedef typename mpl::eval_if<is_same<it, unused_type>,
mpl::identity<unused_type>,
result_of::prior<it> >::type type;
};
template<typename It>
typename result<poly_prior(It)>::type

View File

@ -39,15 +39,17 @@ namespace boost { namespace fusion {
struct strictest_traversal_impl
{
template<typename T>
template<typename Sig>
struct result;
template<typename Next, typename StrictestSoFar>
struct result<strictest_traversal_impl(Next, StrictestSoFar)>
{
typedef StrictestSoFar tag1;
typedef typename traits::category_of<
typename remove_reference<Next>::type>::type tag2;
typedef typename remove_reference<Next>::type next_value;
typedef typename remove_reference<StrictestSoFar>::type strictest_so_far;
typedef strictest_so_far tag1;
typedef typename traits::category_of<next_value>::type tag2;
typedef typename stricter_traversal<tag1,tag2>::type type;
};

View File

@ -73,8 +73,11 @@ namespace boost { namespace fusion {
template<typename Lhs, typename Rhs>
struct result<poly_min(Lhs, Rhs)>
: mpl::min<Lhs, Rhs>
{};
{
typedef typename remove_reference<Lhs>::type lhs;
typedef typename remove_reference<Rhs>::type rhs;
typedef typename mpl::min<lhs, rhs>::type type;
};
};
template<typename Sequences>