forked from boostorg/fusion
144 lines
4.5 KiB
C++
144 lines
4.5 KiB
C++
/*=============================================================================
|
|
Copyright (c) 2005 Joel de Guzman
|
|
Copyright (c) 2005 Eric Niebler
|
|
|
|
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)
|
|
==============================================================================*/
|
|
#if !defined(FUSION_CONS_07172005_0843)
|
|
#define FUSION_CONS_07172005_0843
|
|
|
|
#include <boost/fusion/support/detail/access.hpp>
|
|
#include <boost/fusion/sequence/intrinsic/begin.hpp>
|
|
#include <boost/fusion/sequence/intrinsic/end.hpp>
|
|
#include <boost/fusion/iterator/next.hpp>
|
|
#include <boost/fusion/iterator/deref.hpp>
|
|
#include <boost/fusion/container/list/cons_iterator.hpp>
|
|
#include <boost/fusion/container/list/detail/begin_impl.hpp>
|
|
#include <boost/fusion/container/list/detail/end_impl.hpp>
|
|
#include <boost/fusion/container/list/detail/at_impl.hpp>
|
|
#include <boost/fusion/container/list/detail/value_at_impl.hpp>
|
|
#include <boost/fusion/container/list/detail/empty_impl.hpp>
|
|
#include <boost/type_traits/is_convertible.hpp>
|
|
#include <boost/utility/enable_if.hpp>
|
|
#include <boost/fusion/support/sequence_base.hpp>
|
|
#include <boost/mpl/int.hpp>
|
|
#include <boost/mpl/bool.hpp>
|
|
#include <boost/mpl/or.hpp>
|
|
|
|
namespace boost { namespace fusion
|
|
{
|
|
struct void_;
|
|
struct cons_tag;
|
|
struct forward_traversal_tag;
|
|
struct fusion_sequence_tag;
|
|
|
|
struct nil : sequence_base<nil>
|
|
{
|
|
typedef mpl::int_<0> size;
|
|
typedef cons_tag fusion_tag;
|
|
typedef fusion_sequence_tag tag; // this gets picked up by MPL
|
|
typedef mpl::false_ is_view;
|
|
typedef forward_traversal_tag category;
|
|
typedef void_ car_type;
|
|
typedef void_ cdr_type;
|
|
|
|
nil() {}
|
|
|
|
template <typename Iterator>
|
|
nil(Iterator const& /*iter*/, mpl::true_ /*this_is_an_iterator*/)
|
|
{}
|
|
|
|
template <typename Iterator>
|
|
void assign_from_iter(Iterator const& /*iter*/)
|
|
{
|
|
}
|
|
};
|
|
|
|
template <typename Car, typename Cdr = nil>
|
|
struct cons : sequence_base<cons<Car, Cdr> >
|
|
{
|
|
typedef mpl::int_<Cdr::size::value+1> size;
|
|
typedef cons_tag fusion_tag;
|
|
typedef fusion_sequence_tag tag; // this gets picked up by MPL
|
|
typedef mpl::false_ is_view;
|
|
typedef forward_traversal_tag category;
|
|
typedef Car car_type;
|
|
typedef Cdr cdr_type;
|
|
|
|
cons()
|
|
: car(), cdr() {}
|
|
|
|
explicit cons(typename detail::call_param<Car>::type in_car)
|
|
: car(in_car), cdr() {}
|
|
|
|
cons(
|
|
typename detail::call_param<Car>::type in_car
|
|
, typename detail::call_param<Cdr>::type in_cdr)
|
|
: car(in_car), cdr(in_cdr) {}
|
|
|
|
template <typename Car2, typename Cdr2>
|
|
cons(cons<Car2, Cdr2> const& rhs)
|
|
: car(rhs.car), cdr(rhs.cdr) {}
|
|
|
|
cons(cons const& rhs)
|
|
: car(rhs.car), cdr(rhs.cdr) {}
|
|
|
|
template <typename Sequence>
|
|
cons(
|
|
Sequence const& seq
|
|
, typename disable_if<
|
|
mpl::or_<
|
|
is_convertible<Sequence, cons> // use copy ctor instead
|
|
, is_convertible<Sequence, Car> // use copy to car instead
|
|
>
|
|
>::type* /*dummy*/ = 0
|
|
)
|
|
: car(*fusion::begin(seq))
|
|
, cdr(fusion::next(fusion::begin(seq)), mpl::true_()) {}
|
|
|
|
template <typename Iterator>
|
|
cons(Iterator const& iter, mpl::true_ /*this_is_an_iterator*/)
|
|
: car(*iter)
|
|
, cdr(fusion::next(iter), mpl::true_()) {}
|
|
|
|
template <typename Car2, typename Cdr2>
|
|
cons& operator=(cons<Car2, Cdr2> const& rhs)
|
|
{
|
|
car = rhs.car;
|
|
cdr = rhs.cdr;
|
|
return *this;
|
|
}
|
|
|
|
cons& operator=(cons const& rhs)
|
|
{
|
|
car = rhs.car;
|
|
cdr = rhs.cdr;
|
|
return *this;
|
|
}
|
|
|
|
template <typename Sequence>
|
|
typename disable_if<is_convertible<Sequence, Car>, cons&>::type
|
|
operator=(Sequence const& seq)
|
|
{
|
|
typedef typename result_of::begin<Sequence const>::type Iterator;
|
|
Iterator iter = fusion::begin(seq);
|
|
this->assign_from_iter(iter);
|
|
return *this;
|
|
}
|
|
|
|
template <typename Iterator>
|
|
void assign_from_iter(Iterator const& iter)
|
|
{
|
|
car = *iter;
|
|
cdr.assign_from_iter(fusion::next(iter));
|
|
}
|
|
|
|
car_type car;
|
|
cdr_type cdr;
|
|
};
|
|
}}
|
|
|
|
#endif
|
|
|