Chris@16: 
Chris@16: #ifndef BOOST_MPL_PAIR_VIEW_HPP_INCLUDED
Chris@16: #define BOOST_MPL_PAIR_VIEW_HPP_INCLUDED
Chris@16: 
Chris@16: // Copyright David Abrahams 2003-2004
Chris@16: // Copyright Aleksey Gurtovoy 2004
Chris@16: //
Chris@16: // Distributed under the Boost Software License, Version 1.0. 
Chris@16: // (See accompanying file LICENSE_1_0.txt or copy at 
Chris@16: // http://www.boost.org/LICENSE_1_0.txt)
Chris@16: //
Chris@16: // See http://www.boost.org/libs/mpl for documentation.
Chris@16: 
Chris@101: // $Id$
Chris@101: // $Date$
Chris@101: // $Revision$
Chris@16: 
Chris@16: #include <boost/mpl/begin_end.hpp>
Chris@16: #include <boost/mpl/iterator_category.hpp>
Chris@16: #include <boost/mpl/advance.hpp>
Chris@16: #include <boost/mpl/distance.hpp>
Chris@16: #include <boost/mpl/next_prior.hpp>
Chris@16: #include <boost/mpl/deref.hpp>
Chris@16: #include <boost/mpl/min_max.hpp>
Chris@16: #include <boost/mpl/pair.hpp>
Chris@16: #include <boost/mpl/iterator_tags.hpp>
Chris@16: #include <boost/mpl/aux_/config/ctps.hpp>
Chris@16: #include <boost/mpl/aux_/na_spec.hpp>
Chris@16: 
Chris@16: namespace boost { namespace mpl {
Chris@16: 
Chris@16: namespace aux {
Chris@16: struct pair_iter_tag;
Chris@16: 
Chris@16: #if defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION)
Chris@16: 
Chris@16: template< typename Iter1, typename Iter2, typename Category >
Chris@16: struct pair_iter;
Chris@16: 
Chris@16: template< typename Category > struct prior_pair_iter
Chris@16: {
Chris@16:     template< typename Iter1, typename Iter2 > struct apply
Chris@16:     {
Chris@16:         typedef typename mpl::prior<Iter1>::type i1_;
Chris@16:         typedef typename mpl::prior<Iter2>::type i2_;
Chris@16:         typedef pair_iter<i1_,i2_,Category> type;
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: template<> struct prior_pair_iter<forward_iterator_tag>
Chris@16: {
Chris@16:     template< typename Iter1, typename Iter2 > struct apply
Chris@16:     {
Chris@16:         typedef pair_iter<Iter1,Iter2,forward_iterator_tag> type;
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: #endif
Chris@16: }
Chris@16: 
Chris@16: template< 
Chris@16:       typename Iter1
Chris@16:     , typename Iter2
Chris@16:     , typename Category
Chris@16:     >
Chris@16: struct pair_iter
Chris@16: {
Chris@16:     typedef aux::pair_iter_tag tag;
Chris@16:     typedef Category category;
Chris@16:     typedef Iter1 first;
Chris@16:     typedef Iter2 second;
Chris@16:     
Chris@16: #if defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION)
Chris@16:     typedef pair< 
Chris@16:           typename deref<Iter1>::type
Chris@16:         , typename deref<Iter2>::type
Chris@16:         > type;
Chris@16: 
Chris@16:     typedef typename mpl::next<Iter1>::type i1_;
Chris@16:     typedef typename mpl::next<Iter2>::type i2_;
Chris@16:     typedef pair_iter<i1_,i2_,Category> next;
Chris@16:     
Chris@16:     typedef apply_wrap2< aux::prior_pair_iter<Category>,Iter1,Iter2 >::type prior;
Chris@16: #endif
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: #if !defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION)
Chris@16: 
Chris@16: template< typename Iter1, typename Iter2, typename C >
Chris@16: struct deref< pair_iter<Iter1,Iter2,C> >
Chris@16: {
Chris@16:     typedef pair< 
Chris@16:           typename deref<Iter1>::type
Chris@16:         , typename deref<Iter2>::type
Chris@16:         > type;
Chris@16: };
Chris@16: 
Chris@16: template< typename Iter1, typename Iter2, typename C >
Chris@16: struct next< pair_iter<Iter1,Iter2,C> >
Chris@16: {
Chris@16:     typedef typename mpl::next<Iter1>::type i1_;
Chris@16:     typedef typename mpl::next<Iter2>::type i2_;
Chris@16:     typedef pair_iter<i1_,i2_,C> type;
Chris@16: };
Chris@16: 
Chris@16: template< typename Iter1, typename Iter2, typename C >
Chris@16: struct prior< pair_iter<Iter1,Iter2,C> >
Chris@16: {
Chris@16:     typedef typename mpl::prior<Iter1>::type i1_;
Chris@16:     typedef typename mpl::prior<Iter2>::type i2_;
Chris@16:     typedef pair_iter<i1_,i2_,C> type;
Chris@16: };
Chris@16: 
Chris@16: #endif // BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION
Chris@16: 
Chris@16: 
Chris@16: template<> struct advance_impl<aux::pair_iter_tag>
Chris@16: {
Chris@16:     template< typename Iter, typename D > struct apply
Chris@16:     {
Chris@16:         typedef typename mpl::advance< typename Iter::first,D >::type i1_;
Chris@16:         typedef typename mpl::advance< typename Iter::second,D >::type i2_;
Chris@16:         typedef pair_iter<i1_,i2_,typename Iter::category> type;
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: template<> struct distance_impl<aux::pair_iter_tag>
Chris@16: {
Chris@16:     template< typename Iter1, typename Iter2 > struct apply
Chris@16:     {
Chris@16:         // agurt, 10/nov/04: MSVC 6.5 ICE-s on forwarding
Chris@16:         typedef typename mpl::distance<
Chris@16:               typename first<Iter1>::type
Chris@16:             , typename first<Iter2>::type
Chris@16:             >::type type;
Chris@16:     };
Chris@16: };
Chris@16: 
Chris@16: 
Chris@16: template<
Chris@16:       typename BOOST_MPL_AUX_NA_PARAM(Sequence1)
Chris@16:     , typename BOOST_MPL_AUX_NA_PARAM(Sequence2)
Chris@16:     >
Chris@16: struct pair_view
Chris@16: {
Chris@16:     typedef nested_begin_end_tag tag;
Chris@16: 
Chris@16:     typedef typename begin<Sequence1>::type iter1_;
Chris@16:     typedef typename begin<Sequence2>::type iter2_;
Chris@16:     typedef typename min<
Chris@16:           typename iterator_category<iter1_>::type
Chris@16:         , typename iterator_category<iter2_>::type
Chris@16:         >::type category_;
Chris@16:     
Chris@16:     typedef pair_iter<iter1_,iter2_,category_> begin;
Chris@16:     
Chris@16:     typedef pair_iter<
Chris@16:           typename end<Sequence1>::type
Chris@16:         , typename end<Sequence2>::type
Chris@16:         , category_
Chris@16:         > end;
Chris@16: };
Chris@16: 
Chris@16: BOOST_MPL_AUX_NA_SPEC(2, pair_view)
Chris@16: 
Chris@16: }}
Chris@16: 
Chris@16: #endif // BOOST_MPL_PAIR_VIEW_HPP_INCLUDED