Chris@16: //  tuple_basic.hpp -----------------------------------------------------
Chris@16: 
Chris@16: // Copyright (C) 1999, 2000 Jaakko Jarvi (jaakko.jarvi@cs.utu.fi)
Chris@16: //
Chris@16: // Distributed under the Boost Software License, Version 1.0. (See
Chris@16: // accompanying file LICENSE_1_0.txt or copy at
Chris@16: // http://www.boost.org/LICENSE_1_0.txt)
Chris@16: 
Chris@16: // For more information, see http://www.boost.org
Chris@16: 
Chris@16: // Outside help:
Chris@16: // This and that, Gary Powell.
Chris@16: // Fixed return types for get_head/get_tail
Chris@16: // ( and other bugs ) per suggestion of Jens Maurer
Chris@16: // simplified element type accessors + bug fix  (Jeremy Siek)
Chris@16: // Several changes/additions according to suggestions by Douglas Gregor,
Chris@16: // William Kempf, Vesa Karvonen, John Max Skaller, Ed Brey, Beman Dawes,
Chris@16: // David Abrahams.
Chris@16: 
Chris@16: // Revision history:
Chris@16: // 2002 05 01 Hugo Duncan: Fix for Borland after Jaakko's previous changes
Chris@16: // 2002 04 18 Jaakko: tuple element types can be void or plain function
Chris@16: //                    types, as long as no object is created.
Chris@16: //                    Tuple objects can no hold even noncopyable types
Chris@16: //                    such as arrays.
Chris@16: // 2001 10 22 John Maddock
Chris@16: //      Fixes for Borland C++
Chris@16: // 2001 08 30 David Abrahams
Chris@16: //      Added default constructor for cons<>.
Chris@16: // -----------------------------------------------------------------
Chris@16: 
Chris@16: #ifndef BOOST_TUPLE_BASIC_HPP
Chris@16: #define BOOST_TUPLE_BASIC_HPP
Chris@16: 
Chris@16: 
Chris@16: #include <utility> // needed for the assignment from pair to tuple
Chris@16: 
Chris@16: #include "boost/type_traits/cv_traits.hpp"
Chris@16: #include "boost/type_traits/function_traits.hpp"
Chris@16: #include "boost/utility/swap.hpp"
Chris@16: 
Chris@16: #include "boost/detail/workaround.hpp" // needed for BOOST_WORKAROUND
Chris@16: 
Chris@101: #if BOOST_GCC >= 40700
Chris@101: #pragma GCC diagnostic push
Chris@101: #pragma GCC diagnostic ignored "-Wunused-local-typedefs"
Chris@101: #endif
Chris@101: 
Chris@16: namespace boost {
Chris@16: namespace tuples {
Chris@16: 
Chris@16: // -- null_type --------------------------------------------------------
Chris@16: struct null_type {};
Chris@16: 
Chris@16: // a helper function to provide a const null_type type temporary
Chris@16: namespace detail {
Chris@16:   inline const null_type cnull() { return null_type(); }
Chris@16: 
Chris@16: 
Chris@16: // -- if construct ------------------------------------------------
Chris@16: // Proposed by Krzysztof Czarnecki and Ulrich Eisenecker
Chris@16: 
Chris@16: template <bool If, class Then, class Else> struct IF { typedef Then RET; };
Chris@16: 
Chris@16: template <class Then, class Else> struct IF<false, Then, Else> {
Chris@16:   typedef Else RET;
Chris@16: };
Chris@16: 
Chris@16: } // end detail
Chris@16: 
Chris@16: // - cons forward declaration -----------------------------------------------
Chris@16: template <class HT, class TT> struct cons;
Chris@16: 
Chris@16: 
Chris@16: // - tuple forward declaration -----------------------------------------------
Chris@16: template <
Chris@16:   class T0 = null_type, class T1 = null_type, class T2 = null_type,
Chris@16:   class T3 = null_type, class T4 = null_type, class T5 = null_type,
Chris@16:   class T6 = null_type, class T7 = null_type, class T8 = null_type,
Chris@16:   class T9 = null_type>
Chris@16: class tuple;
Chris@16: 
Chris@16: // tuple_length forward declaration
Chris@16: template<class T> struct length;
Chris@16: 
Chris@16: 
Chris@16: 
Chris@16: namespace detail {
Chris@16: 
Chris@16: // -- generate error template, referencing to non-existing members of this
Chris@16: // template is used to produce compilation errors intentionally
Chris@16: template<class T>
Chris@16: class generate_error;
Chris@16: 
Chris@16: template<int N>
Chris@16: struct drop_front {
Chris@16:     template<class Tuple>
Chris@16:     struct apply {
Chris@16:         typedef BOOST_DEDUCED_TYPENAME drop_front<N-1>::BOOST_NESTED_TEMPLATE
Chris@16:             apply<Tuple> next;
Chris@16:         typedef BOOST_DEDUCED_TYPENAME next::type::tail_type type;
Chris@16:         static const type& call(const Tuple& tup) {
Chris@16:             return next::call(tup).tail;
Chris@16:         }
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct drop_front<0> {
Chris@16:     template<class Tuple>
Chris@16:     struct apply {
Chris@16:         typedef Tuple type;
Chris@16:         static const type& call(const Tuple& tup) {
Chris@16:             return tup;
Chris@16:         }
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: } // end of namespace detail
Chris@16: 
Chris@16: 
Chris@16: // -cons type accessors ----------------------------------------
Chris@16: // typename tuples::element<N,T>::type gets the type of the
Chris@16: // Nth element ot T, first element is at index 0
Chris@16: // -------------------------------------------------------
Chris@16: 
Chris@16: #ifndef BOOST_NO_CV_SPECIALIZATIONS
Chris@16: 
Chris@16: template<int N, class T>
Chris@16: struct element
Chris@16: {
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<T>::type::head_type type;
Chris@16: };
Chris@16: 
Chris@16: template<int N, class T>
Chris@16: struct element<N, const T>
Chris@16: {
Chris@16: private:
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<T>::type::head_type unqualified_type;
Chris@16: public:
Chris@16: #if BOOST_WORKAROUND(__BORLANDC__,<0x600)
Chris@16:   typedef const unqualified_type type;
Chris@16: #else
Chris@16:   typedef BOOST_DEDUCED_TYPENAME boost::add_const<unqualified_type>::type type;
Chris@16: #endif
Chris@16: };
Chris@16: #else // def BOOST_NO_CV_SPECIALIZATIONS
Chris@16: 
Chris@16: namespace detail {
Chris@16: 
Chris@16: template<int N, class T, bool IsConst>
Chris@16: struct element_impl
Chris@16: {
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<T>::type::head_type type;
Chris@16: };
Chris@16: 
Chris@16: template<int N, class T>
Chris@16: struct element_impl<N, T, true /* IsConst */>
Chris@16: {
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<T>::type::head_type unqualified_type;
Chris@16:   typedef const unqualified_type type;
Chris@16: };
Chris@16: 
Chris@16: } // end of namespace detail
Chris@16: 
Chris@16: 
Chris@16: template<int N, class T>
Chris@16: struct element:
Chris@16:   public detail::element_impl<N, T, ::boost::is_const<T>::value>
Chris@16: {
Chris@16: };
Chris@16: 
Chris@16: #endif
Chris@16: 
Chris@16: 
Chris@16: // -get function templates -----------------------------------------------
Chris@16: // Usage: get<N>(aTuple)
Chris@16: 
Chris@16: // -- some traits classes for get functions
Chris@16: 
Chris@16: // access traits lifted from detail namespace to be part of the interface,
Chris@16: // (Joel de Guzman's suggestion). Rationale: get functions are part of the
Chris@16: // interface, so should the way to express their return types be.
Chris@16: 
Chris@16: template <class T> struct access_traits {
Chris@16:   typedef const T& const_type;
Chris@16:   typedef T& non_const_type;
Chris@16: 
Chris@16:   typedef const typename boost::remove_cv<T>::type& parameter_type;
Chris@16: 
Chris@16: // used as the tuple constructors parameter types
Chris@16: // Rationale: non-reference tuple element types can be cv-qualified.
Chris@16: // It should be possible to initialize such types with temporaries,
Chris@16: // and when binding temporaries to references, the reference must
Chris@16: // be non-volatile and const. 8.5.3. (5)
Chris@16: };
Chris@16: 
Chris@16: template <class T> struct access_traits<T&> {
Chris@16: 
Chris@16:   typedef T& const_type;
Chris@16:   typedef T& non_const_type;
Chris@16: 
Chris@16:   typedef T& parameter_type;
Chris@16: };
Chris@16: 
Chris@16: // get function for non-const cons-lists, returns a reference to the element
Chris@16: 
Chris@16: template<int N, class HT, class TT>
Chris@16: inline typename access_traits<
Chris@16:                   typename element<N, cons<HT, TT> >::type
Chris@16:                 >::non_const_type
Chris@101: get(cons<HT, TT>& c) {
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<cons<HT, TT> > impl;
Chris@16:   typedef BOOST_DEDUCED_TYPENAME impl::type cons_element;
Chris@16:   return const_cast<cons_element&>(impl::call(c)).head;
Chris@16: }
Chris@16: 
Chris@16: // get function for const cons-lists, returns a const reference to
Chris@16: // the element. If the element is a reference, returns the reference
Chris@16: // as such (that is, can return a non-const reference)
Chris@16: template<int N, class HT, class TT>
Chris@16: inline typename access_traits<
Chris@16:                   typename element<N, cons<HT, TT> >::type
Chris@16:                 >::const_type
Chris@101: get(const cons<HT, TT>& c) {
Chris@16:   typedef BOOST_DEDUCED_TYPENAME detail::drop_front<N>::BOOST_NESTED_TEMPLATE
Chris@16:       apply<cons<HT, TT> > impl;
Chris@16:   return impl::call(c).head;
Chris@16: }
Chris@16: 
Chris@16: // -- the cons template  --------------------------------------------------
Chris@16: namespace detail {
Chris@16: 
Chris@16: //  These helper templates wrap void types and plain function types.
Chris@16: //  The reationale is to allow one to write tuple types with those types
Chris@16: //  as elements, even though it is not possible to instantiate such object.
Chris@16: //  E.g: typedef tuple<void> some_type; // ok
Chris@16: //  but: some_type x; // fails
Chris@16: 
Chris@16: template <class T> class non_storeable_type {
Chris@16:   non_storeable_type();
Chris@16: };
Chris@16: 
Chris@16: template <class T> struct wrap_non_storeable_type {
Chris@16:   typedef typename IF<
Chris@16:     ::boost::is_function<T>::value, non_storeable_type<T>, T
Chris@16:   >::RET type;
Chris@16: };
Chris@16: template <> struct wrap_non_storeable_type<void> {
Chris@16:   typedef non_storeable_type<void> type;
Chris@16: };
Chris@16: 
Chris@16: } // detail
Chris@16: 
Chris@16: template <class HT, class TT>
Chris@16: struct cons {
Chris@16: 
Chris@16:   typedef HT head_type;
Chris@16:   typedef TT tail_type;
Chris@16: 
Chris@16:   typedef typename
Chris@16:     detail::wrap_non_storeable_type<head_type>::type stored_head_type;
Chris@16: 
Chris@16:   stored_head_type head;
Chris@16:   tail_type tail;
Chris@16: 
Chris@16:   typename access_traits<stored_head_type>::non_const_type
Chris@16:   get_head() { return head; }
Chris@16: 
Chris@16:   typename access_traits<tail_type>::non_const_type
Chris@16:   get_tail() { return tail; }
Chris@16: 
Chris@16:   typename access_traits<stored_head_type>::const_type
Chris@16:   get_head() const { return head; }
Chris@16: 
Chris@16:   typename access_traits<tail_type>::const_type
Chris@16:   get_tail() const { return tail; }
Chris@16: 
Chris@16:   cons() : head(), tail() {}
Chris@16:   //  cons() : head(detail::default_arg<HT>::f()), tail() {}
Chris@16: 
Chris@16:   // the argument for head is not strictly needed, but it prevents
Chris@16:   // array type elements. This is good, since array type elements
Chris@16:   // cannot be supported properly in any case (no assignment,
Chris@16:   // copy works only if the tails are exactly the same type, ...)
Chris@16: 
Chris@16:   cons(typename access_traits<stored_head_type>::parameter_type h,
Chris@16:        const tail_type& t)
Chris@16:     : head (h), tail(t) {}
Chris@16: 
Chris@16:   template <class T1, class T2, class T3, class T4, class T5,
Chris@16:             class T6, class T7, class T8, class T9, class T10>
Chris@16:   cons( T1& t1, T2& t2, T3& t3, T4& t4, T5& t5,
Chris@16:         T6& t6, T7& t7, T8& t8, T9& t9, T10& t10 )
Chris@16:     : head (t1),
Chris@16:       tail (t2, t3, t4, t5, t6, t7, t8, t9, t10, detail::cnull())
Chris@16:       {}
Chris@16: 
Chris@16:   template <class T2, class T3, class T4, class T5,
Chris@16:             class T6, class T7, class T8, class T9, class T10>
Chris@16:   cons( const null_type& /*t1*/, T2& t2, T3& t3, T4& t4, T5& t5,
Chris@16:         T6& t6, T7& t7, T8& t8, T9& t9, T10& t10 )
Chris@16:     : head (),
Chris@16:       tail (t2, t3, t4, t5, t6, t7, t8, t9, t10, detail::cnull())
Chris@16:       {}
Chris@16: 
Chris@16: 
Chris@16:   template <class HT2, class TT2>
Chris@16:   cons( const cons<HT2, TT2>& u ) : head(u.head), tail(u.tail) {}
Chris@16: 
Chris@16:   template <class HT2, class TT2>
Chris@16:   cons& operator=( const cons<HT2, TT2>& u ) {
Chris@16:     head=u.head; tail=u.tail; return *this;
Chris@16:   }
Chris@16: 
Chris@16:   // must define assignment operator explicitly, implicit version is
Chris@16:   // illformed if HT is a reference (12.8. (12))
Chris@16:   cons& operator=(const cons& u) {
Chris@16:     head = u.head; tail = u.tail;  return *this;
Chris@16:   }
Chris@16: 
Chris@16:   template <class T1, class T2>
Chris@16:   cons& operator=( const std::pair<T1, T2>& u ) {
Chris@16:     BOOST_STATIC_ASSERT(length<cons>::value == 2); // check length = 2
Chris@16:     head = u.first; tail.head = u.second; return *this;
Chris@16:   }
Chris@16: 
Chris@16:   // get member functions (non-const and const)
Chris@16:   template <int N>
Chris@16:   typename access_traits<
Chris@16:              typename element<N, cons<HT, TT> >::type
Chris@16:            >::non_const_type
Chris@16:   get() {
Chris@16:     return boost::tuples::get<N>(*this); // delegate to non-member get
Chris@16:   }
Chris@16: 
Chris@16:   template <int N>
Chris@16:   typename access_traits<
Chris@16:              typename element<N, cons<HT, TT> >::type
Chris@16:            >::const_type
Chris@16:   get() const {
Chris@16:     return boost::tuples::get<N>(*this); // delegate to non-member get
Chris@16:   }
Chris@16: };
Chris@16: 
Chris@16: template <class HT>
Chris@16: struct cons<HT, null_type> {
Chris@16: 
Chris@16:   typedef HT head_type;
Chris@16:   typedef null_type tail_type;
Chris@16:   typedef cons<HT, null_type> self_type;
Chris@16: 
Chris@16:   typedef typename
Chris@16:     detail::wrap_non_storeable_type<head_type>::type stored_head_type;
Chris@16:   stored_head_type head;
Chris@16: 
Chris@16:   typename access_traits<stored_head_type>::non_const_type
Chris@16:   get_head() { return head; }
Chris@16: 
Chris@16:   null_type get_tail() { return null_type(); }
Chris@16: 
Chris@16:   typename access_traits<stored_head_type>::const_type
Chris@16:   get_head() const { return head; }
Chris@16: 
Chris@16:   const null_type get_tail() const { return null_type(); }
Chris@16: 
Chris@16:   //  cons() : head(detail::default_arg<HT>::f()) {}
Chris@16:   cons() : head() {}
Chris@16: 
Chris@16:   cons(typename access_traits<stored_head_type>::parameter_type h,
Chris@16:        const null_type& = null_type())
Chris@16:     : head (h) {}
Chris@16: 
Chris@16:   template<class T1>
Chris@16:   cons(T1& t1, const null_type&, const null_type&, const null_type&,
Chris@16:        const null_type&, const null_type&, const null_type&,
Chris@16:        const null_type&, const null_type&, const null_type&)
Chris@16:   : head (t1) {}
Chris@16: 
Chris@16:   cons(const null_type&,
Chris@16:        const null_type&, const null_type&, const null_type&,
Chris@16:        const null_type&, const null_type&, const null_type&,
Chris@16:        const null_type&, const null_type&, const null_type&)
Chris@16:   : head () {}
Chris@16: 
Chris@16:   template <class HT2>
Chris@16:   cons( const cons<HT2, null_type>& u ) : head(u.head) {}
Chris@16: 
Chris@16:   template <class HT2>
Chris@16:   cons& operator=(const cons<HT2, null_type>& u )
Chris@16:   { head = u.head; return *this; }
Chris@16: 
Chris@16:   // must define assignment operator explicitely, implicit version
Chris@16:   // is illformed if HT is a reference
Chris@16:   cons& operator=(const cons& u) { head = u.head; return *this; }
Chris@16: 
Chris@16:   template <int N>
Chris@16:   typename access_traits<
Chris@16:              typename element<N, self_type>::type
Chris@16:             >::non_const_type
Chris@101:   get() {
Chris@16:     return boost::tuples::get<N>(*this);
Chris@16:   }
Chris@16: 
Chris@16:   template <int N>
Chris@16:   typename access_traits<
Chris@16:              typename element<N, self_type>::type
Chris@16:            >::const_type
Chris@101:   get() const {
Chris@16:     return boost::tuples::get<N>(*this);
Chris@16:   }
Chris@16: 
Chris@16: };
Chris@16: 
Chris@16: // templates for finding out the length of the tuple -------------------
Chris@16: 
Chris@16: template<class T>
Chris@16: struct length  {
Chris@16:   BOOST_STATIC_CONSTANT(int, value = 1 + length<typename T::tail_type>::value);
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct length<tuple<> > {
Chris@16:   BOOST_STATIC_CONSTANT(int, value = 0);
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct length<tuple<> const> {
Chris@16:   BOOST_STATIC_CONSTANT(int, value = 0);
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct length<null_type> {
Chris@16:   BOOST_STATIC_CONSTANT(int, value = 0);
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct length<null_type const> {
Chris@16:   BOOST_STATIC_CONSTANT(int, value = 0);
Chris@16: };
Chris@16: 
Chris@16: namespace detail {
Chris@16: 
Chris@16: // Tuple to cons mapper --------------------------------------------------
Chris@16: template <class T0, class T1, class T2, class T3, class T4,
Chris@16:           class T5, class T6, class T7, class T8, class T9>
Chris@16: struct map_tuple_to_cons
Chris@16: {
Chris@16:   typedef cons<T0,
Chris@16:                typename map_tuple_to_cons<T1, T2, T3, T4, T5,
Chris@16:                                           T6, T7, T8, T9, null_type>::type
Chris@16:               > type;
Chris@16: };
Chris@16: 
Chris@16: // The empty tuple is a null_type
Chris@16: template <>
Chris@16: struct map_tuple_to_cons<null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type>
Chris@16: {
Chris@16:   typedef null_type type;
Chris@16: };
Chris@16: 
Chris@16: } // end detail
Chris@16: 
Chris@16: // -------------------------------------------------------------------
Chris@16: // -- tuple ------------------------------------------------------
Chris@16: template <class T0, class T1, class T2, class T3, class T4,
Chris@16:           class T5, class T6, class T7, class T8, class T9>
Chris@16: 
Chris@16: class tuple :
Chris@16:   public detail::map_tuple_to_cons<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type
Chris@16: {
Chris@16: public:
Chris@16:   typedef typename
Chris@16:     detail::map_tuple_to_cons<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type inherited;
Chris@16:   typedef typename inherited::head_type head_type;
Chris@16:   typedef typename inherited::tail_type tail_type;
Chris@16: 
Chris@16: 
Chris@16: // access_traits<T>::parameter_type takes non-reference types as const T&
Chris@16:   tuple() {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0)
Chris@16:     : inherited(t0, detail::cnull(), detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1)
Chris@16:     : inherited(t0, t1, detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2)
Chris@16:     : inherited(t0, t1, t2, detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3)
Chris@16:     : inherited(t0, t1, t2, t3, detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4)
Chris@16:     : inherited(t0, t1, t2, t3, t4, detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4,
Chris@16:         typename access_traits<T5>::parameter_type t5)
Chris@16:     : inherited(t0, t1, t2, t3, t4, t5, detail::cnull(), detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4,
Chris@16:         typename access_traits<T5>::parameter_type t5,
Chris@16:         typename access_traits<T6>::parameter_type t6)
Chris@16:     : inherited(t0, t1, t2, t3, t4, t5, t6, detail::cnull(),
Chris@16:                 detail::cnull(), detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4,
Chris@16:         typename access_traits<T5>::parameter_type t5,
Chris@16:         typename access_traits<T6>::parameter_type t6,
Chris@16:         typename access_traits<T7>::parameter_type t7)
Chris@16:     : inherited(t0, t1, t2, t3, t4, t5, t6, t7, detail::cnull(),
Chris@16:                 detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4,
Chris@16:         typename access_traits<T5>::parameter_type t5,
Chris@16:         typename access_traits<T6>::parameter_type t6,
Chris@16:         typename access_traits<T7>::parameter_type t7,
Chris@16:         typename access_traits<T8>::parameter_type t8)
Chris@16:     : inherited(t0, t1, t2, t3, t4, t5, t6, t7, t8, detail::cnull()) {}
Chris@16: 
Chris@16:   tuple(typename access_traits<T0>::parameter_type t0,
Chris@16:         typename access_traits<T1>::parameter_type t1,
Chris@16:         typename access_traits<T2>::parameter_type t2,
Chris@16:         typename access_traits<T3>::parameter_type t3,
Chris@16:         typename access_traits<T4>::parameter_type t4,
Chris@16:         typename access_traits<T5>::parameter_type t5,
Chris@16:         typename access_traits<T6>::parameter_type t6,
Chris@16:         typename access_traits<T7>::parameter_type t7,
Chris@16:         typename access_traits<T8>::parameter_type t8,
Chris@16:         typename access_traits<T9>::parameter_type t9)
Chris@16:     : inherited(t0, t1, t2, t3, t4, t5, t6, t7, t8, t9) {}
Chris@16: 
Chris@16: 
Chris@16:   template<class U1, class U2>
Chris@16:   tuple(const cons<U1, U2>& p) : inherited(p) {}
Chris@16: 
Chris@16:   template <class U1, class U2>
Chris@16:   tuple& operator=(const cons<U1, U2>& k) {
Chris@16:     inherited::operator=(k);
Chris@16:     return *this;
Chris@16:   }
Chris@16: 
Chris@16:   template <class U1, class U2>
Chris@16:   tuple& operator=(const std::pair<U1, U2>& k) {
Chris@16:     BOOST_STATIC_ASSERT(length<tuple>::value == 2);// check_length = 2
Chris@16:     this->head = k.first;
Chris@16:     this->tail.head = k.second;
Chris@16:     return *this;
Chris@16:   }
Chris@16: 
Chris@16: };
Chris@16: 
Chris@16: // The empty tuple
Chris@16: template <>
Chris@16: class tuple<null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type, null_type>  :
Chris@16:   public null_type
Chris@16: {
Chris@16: public:
Chris@16:   typedef null_type inherited;
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: // Swallows any assignment   (by Doug Gregor)
Chris@16: namespace detail {
Chris@16: 
Chris@16: struct swallow_assign;
Chris@16: typedef void (detail::swallow_assign::*ignore_t)();
Chris@16: struct swallow_assign {
Chris@16:   swallow_assign(ignore_t(*)(ignore_t)) {}
Chris@16:   template<typename T>
Chris@16:   swallow_assign const& operator=(const T&) const {
Chris@16:     return *this;
Chris@16:   }
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: } // namespace detail
Chris@16: 
Chris@16: // "ignore" allows tuple positions to be ignored when using "tie".
Chris@16: inline detail::ignore_t ignore(detail::ignore_t) { return 0; }
Chris@16: 
Chris@16: // ---------------------------------------------------------------------------
Chris@16: // The call_traits for make_tuple
Chris@16: // Honours the reference_wrapper class.
Chris@16: 
Chris@16: // Must be instantiated with plain or const plain types (not with references)
Chris@16: 
Chris@16: // from template<class T> foo(const T& t) : make_tuple_traits<const T>::type
Chris@16: // from template<class T> foo(T& t) : make_tuple_traits<T>::type
Chris@16: 
Chris@16: // Conversions:
Chris@16: // T -> T,
Chris@16: // references -> compile_time_error
Chris@16: // reference_wrapper<T> -> T&
Chris@16: // const reference_wrapper<T> -> T&
Chris@16: // array -> const ref array
Chris@16: 
Chris@16: 
Chris@16: template<class T>
Chris@16: struct make_tuple_traits {
Chris@16:   typedef T type;
Chris@16: 
Chris@16:   // commented away, see below  (JJ)
Chris@16:   //  typedef typename IF<
Chris@16:   //  boost::is_function<T>::value,
Chris@16:   //  T&,
Chris@16:   //  T>::RET type;
Chris@16: 
Chris@16: };
Chris@16: 
Chris@16: // The is_function test was there originally for plain function types,
Chris@16: // which can't be stored as such (we must either store them as references or
Chris@16: // pointers). Such a type could be formed if make_tuple was called with a
Chris@16: // reference to a function.
Chris@16: // But this would mean that a const qualified function type was formed in
Chris@16: // the make_tuple function and hence make_tuple can't take a function
Chris@16: // reference as a parameter, and thus T can't be a function type.
Chris@16: // So is_function test was removed.
Chris@16: // (14.8.3. says that type deduction fails if a cv-qualified function type
Chris@16: // is created. (It only applies for the case of explicitly specifying template
Chris@16: // args, though?)) (JJ)
Chris@16: 
Chris@16: template<class T>
Chris@16: struct make_tuple_traits<T&> {
Chris@16:   typedef typename
Chris@16:      detail::generate_error<T&>::
Chris@16:        do_not_use_with_reference_type error;
Chris@16: };
Chris@16: 
Chris@16: // Arrays can't be stored as plain types; convert them to references.
Chris@16: // All arrays are converted to const. This is because make_tuple takes its
Chris@16: // parameters as const T& and thus the knowledge of the potential
Chris@16: // non-constness of actual argument is lost.
Chris@16: template<class T, int n>  struct make_tuple_traits <T[n]> {
Chris@16:   typedef const T (&type)[n];
Chris@16: };
Chris@16: 
Chris@16: template<class T, int n>
Chris@16: struct make_tuple_traits<const T[n]> {
Chris@16:   typedef const T (&type)[n];
Chris@16: };
Chris@16: 
Chris@16: template<class T, int n>  struct make_tuple_traits<volatile T[n]> {
Chris@16:   typedef const volatile T (&type)[n];
Chris@16: };
Chris@16: 
Chris@16: template<class T, int n>
Chris@16: struct make_tuple_traits<const volatile T[n]> {
Chris@16:   typedef const volatile T (&type)[n];
Chris@16: };
Chris@16: 
Chris@16: template<class T>
Chris@16: struct make_tuple_traits<reference_wrapper<T> >{
Chris@16:   typedef T& type;
Chris@16: };
Chris@16: 
Chris@16: template<class T>
Chris@16: struct make_tuple_traits<const reference_wrapper<T> >{
Chris@16:   typedef T& type;
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct make_tuple_traits<detail::ignore_t(detail::ignore_t)> {
Chris@16:   typedef detail::swallow_assign type;
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: 
Chris@16: namespace detail {
Chris@16: 
Chris@16: // a helper traits to make the make_tuple functions shorter (Vesa Karvonen's
Chris@16: // suggestion)
Chris@16: template <
Chris@16:   class T0 = null_type, class T1 = null_type, class T2 = null_type,
Chris@16:   class T3 = null_type, class T4 = null_type, class T5 = null_type,
Chris@16:   class T6 = null_type, class T7 = null_type, class T8 = null_type,
Chris@16:   class T9 = null_type
Chris@16: >
Chris@16: struct make_tuple_mapper {
Chris@16:   typedef
Chris@16:     tuple<typename make_tuple_traits<T0>::type,
Chris@16:           typename make_tuple_traits<T1>::type,
Chris@16:           typename make_tuple_traits<T2>::type,
Chris@16:           typename make_tuple_traits<T3>::type,
Chris@16:           typename make_tuple_traits<T4>::type,
Chris@16:           typename make_tuple_traits<T5>::type,
Chris@16:           typename make_tuple_traits<T6>::type,
Chris@16:           typename make_tuple_traits<T7>::type,
Chris@16:           typename make_tuple_traits<T8>::type,
Chris@16:           typename make_tuple_traits<T9>::type> type;
Chris@16: };
Chris@16: 
Chris@16: } // end detail
Chris@16: 
Chris@16: // -make_tuple function templates -----------------------------------
Chris@16: inline tuple<> make_tuple() {
Chris@16:   return tuple<>();
Chris@16: }
Chris@16: 
Chris@16: template<class T0>
Chris@16: inline typename detail::make_tuple_mapper<T0>::type
Chris@16: make_tuple(const T0& t0) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0>::type t;
Chris@16:   return t(t0);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1>::type
Chris@16: make_tuple(const T0& t0, const T1& t1) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0, T1>::type t;
Chris@16:   return t(t0, t1);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0, T1, T2>::type t;
Chris@16:   return t(t0, t1, t2);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2, T3>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0, T1, T2, T3>::type t;
Chris@16:   return t(t0, t1, t2, t3);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2, T3, T4>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0, T1, T2, T3, T4>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2, T3, T4, T5>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4, const T5& t5) {
Chris@16:   typedef typename detail::make_tuple_mapper<T0, T1, T2, T3, T4, T5>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2, T3, T4, T5, T6>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4, const T5& t5, const T6& t6) {
Chris@16:   typedef typename detail::make_tuple_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7>
Chris@16: inline typename detail::make_tuple_mapper<T0, T1, T2, T3, T4, T5, T6, T7>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4, const T5& t5, const T6& t6, const T7& t7) {
Chris@16:   typedef typename detail::make_tuple_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7, class T8>
Chris@16: inline typename detail::make_tuple_mapper
Chris@16:   <T0, T1, T2, T3, T4, T5, T6, T7, T8>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4, const T5& t5, const T6& t6, const T7& t7,
Chris@16:                   const T8& t8) {
Chris@16:   typedef typename detail::make_tuple_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7, T8>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7, t8);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7, class T8, class T9>
Chris@16: inline typename detail::make_tuple_mapper
Chris@16:   <T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type
Chris@16: make_tuple(const T0& t0, const T1& t1, const T2& t2, const T3& t3,
Chris@16:                   const T4& t4, const T5& t5, const T6& t6, const T7& t7,
Chris@16:                   const T8& t8, const T9& t9) {
Chris@16:   typedef typename detail::make_tuple_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7, t8, t9);
Chris@16: }
Chris@16: 
Chris@16: namespace detail {
Chris@16: 
Chris@16: template<class T>
Chris@16: struct tie_traits {
Chris@16:   typedef T& type;
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct tie_traits<ignore_t(ignore_t)> {
Chris@16:   typedef swallow_assign type;
Chris@16: };
Chris@16: 
Chris@16: template<>
Chris@16: struct tie_traits<void> {
Chris@16:   typedef null_type type;
Chris@16: };
Chris@16: 
Chris@16: template <
Chris@16:   class T0 = void, class T1 = void, class T2 = void,
Chris@16:   class T3 = void, class T4 = void, class T5 = void,
Chris@16:   class T6 = void, class T7 = void, class T8 = void,
Chris@16:   class T9 = void
Chris@16: >
Chris@16: struct tie_mapper {
Chris@16:   typedef
Chris@16:     tuple<typename tie_traits<T0>::type,
Chris@16:           typename tie_traits<T1>::type,
Chris@16:           typename tie_traits<T2>::type,
Chris@16:           typename tie_traits<T3>::type,
Chris@16:           typename tie_traits<T4>::type,
Chris@16:           typename tie_traits<T5>::type,
Chris@16:           typename tie_traits<T6>::type,
Chris@16:           typename tie_traits<T7>::type,
Chris@16:           typename tie_traits<T8>::type,
Chris@16:           typename tie_traits<T9>::type> type;
Chris@16: };
Chris@16: 
Chris@16: }
Chris@16: 
Chris@16: // Tie function templates -------------------------------------------------
Chris@16: template<class T0>
Chris@16: inline typename detail::tie_mapper<T0>::type
Chris@16: tie(T0& t0) {
Chris@16:   typedef typename detail::tie_mapper<T0>::type t;
Chris@16:   return t(t0);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1>
Chris@16: inline typename detail::tie_mapper<T0, T1>::type
Chris@16: tie(T0& t0, T1& t1) {
Chris@16:   typedef typename detail::tie_mapper<T0, T1>::type t;
Chris@16:   return t(t0, t1);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2) {
Chris@16:   typedef typename detail::tie_mapper<T0, T1, T2>::type t;
Chris@16:   return t(t0, t1, t2);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2, T3>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3) {
Chris@16:   typedef typename detail::tie_mapper<T0, T1, T2, T3>::type t;
Chris@16:   return t(t0, t1, t2, t3);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2, T3, T4>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4) {
Chris@16:   typedef typename detail::tie_mapper<T0, T1, T2, T3, T4>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2, T3, T4, T5>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4, T5& t5) {
Chris@16:   typedef typename detail::tie_mapper<T0, T1, T2, T3, T4, T5>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2, T3, T4, T5, T6>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4, T5& t5, T6& t6) {
Chris@16:   typedef typename detail::tie_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7>
Chris@16: inline typename detail::tie_mapper<T0, T1, T2, T3, T4, T5, T6, T7>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4, T5& t5, T6& t6, T7& t7) {
Chris@16:   typedef typename detail::tie_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7, class T8>
Chris@16: inline typename detail::tie_mapper
Chris@16:   <T0, T1, T2, T3, T4, T5, T6, T7, T8>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4, T5& t5, T6& t6, T7& t7,
Chris@16:                   T8& t8) {
Chris@16:   typedef typename detail::tie_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7, T8>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7, t8);
Chris@16: }
Chris@16: 
Chris@16: template<class T0, class T1, class T2, class T3, class T4, class T5, class T6,
Chris@16:          class T7, class T8, class T9>
Chris@16: inline typename detail::tie_mapper
Chris@16:   <T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type
Chris@16: tie(T0& t0, T1& t1, T2& t2, T3& t3,
Chris@16:                   T4& t4, T5& t5, T6& t6, T7& t7,
Chris@16:                   T8& t8, T9& t9) {
Chris@16:   typedef typename detail::tie_mapper
Chris@16:            <T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>::type t;
Chris@16:   return t(t0, t1, t2, t3, t4, t5, t6, t7, t8, t9);
Chris@16: }
Chris@16: 
Chris@16: template <class T0, class T1, class T2, class T3, class T4,
Chris@16:           class T5, class T6, class T7, class T8, class T9>
Chris@16: void swap(tuple<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>& lhs,
Chris@16:           tuple<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>& rhs);
Chris@16: inline void swap(null_type&, null_type&) {}
Chris@16: template<class HH>
Chris@16: inline void swap(cons<HH, null_type>& lhs, cons<HH, null_type>& rhs) {
Chris@16:   ::boost::swap(lhs.head, rhs.head);
Chris@16: }
Chris@16: template<class HH, class TT>
Chris@16: inline void swap(cons<HH, TT>& lhs, cons<HH, TT>& rhs) {
Chris@16:   ::boost::swap(lhs.head, rhs.head);
Chris@16:   ::boost::tuples::swap(lhs.tail, rhs.tail);
Chris@16: }
Chris@16: template <class T0, class T1, class T2, class T3, class T4,
Chris@16:           class T5, class T6, class T7, class T8, class T9>
Chris@16: inline void swap(tuple<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>& lhs,
Chris@16:           tuple<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9>& rhs) {
Chris@16:   typedef tuple<T0, T1, T2, T3, T4, T5, T6, T7, T8, T9> tuple_type;
Chris@16:   typedef typename tuple_type::inherited base;
Chris@16:   ::boost::tuples::swap(static_cast<base&>(lhs), static_cast<base&>(rhs));
Chris@16: }
Chris@16: 
Chris@16: } // end of namespace tuples
Chris@16: } // end of namespace boost
Chris@16: 
Chris@16: 
Chris@101: #if BOOST_GCC >= 40700
Chris@101: #pragma GCC diagnostic pop
Chris@101: #endif
Chris@101: 
Chris@101: 
Chris@16: #endif // BOOST_TUPLE_BASIC_HPP
Chris@16: 
Chris@16: