ossrv_pub/boost_apis/boost/mpl/equal.hpp
changeset 0 e4d67989cc36
equal deleted inserted replaced
-1:000000000000 0:e4d67989cc36
       
     1 
       
     2 #ifndef BOOST_MPL_EQUAL_HPP_INCLUDED
       
     3 #define BOOST_MPL_EQUAL_HPP_INCLUDED
       
     4 
       
     5 // Copyright Aleksey Gurtovoy 2000-2004
       
     6 //
       
     7 // Distributed under the Boost Software License, Version 1.0. 
       
     8 // (See accompanying file LICENSE_1_0.txt or copy at 
       
     9 // http://www.boost.org/LICENSE_1_0.txt)
       
    10 //
       
    11 // See http://www.boost.org/libs/mpl for documentation.
       
    12 
       
    13 // $Source: /cvsroot/boost/boost/boost/mpl/equal.hpp,v $
       
    14 // $Date: 2004/09/02 15:40:41 $
       
    15 // $Revision: 1.6 $
       
    16 
       
    17 #include <boost/mpl/aux_/iter_fold_if_impl.hpp>
       
    18 #include <boost/mpl/aux_/iter_apply.hpp>
       
    19 #include <boost/mpl/and.hpp>
       
    20 #include <boost/mpl/not.hpp>
       
    21 #include <boost/mpl/begin_end.hpp>
       
    22 #include <boost/mpl/next.hpp>
       
    23 #include <boost/mpl/always.hpp>
       
    24 #include <boost/mpl/bool.hpp>
       
    25 #include <boost/mpl/lambda.hpp>
       
    26 #include <boost/mpl/bind.hpp>
       
    27 #include <boost/mpl/apply.hpp>
       
    28 #include <boost/mpl/void.hpp>
       
    29 #include <boost/mpl/aux_/na_spec.hpp>
       
    30 #include <boost/mpl/aux_/lambda_support.hpp>
       
    31 #include <boost/mpl/aux_/msvc_eti_base.hpp>
       
    32 
       
    33 #include <boost/type_traits/is_same.hpp>
       
    34 
       
    35 namespace boost { namespace mpl {
       
    36 
       
    37 namespace aux {
       
    38 
       
    39 template<
       
    40       typename Predicate
       
    41     , typename LastIterator1
       
    42     , typename LastIterator2
       
    43     >
       
    44 struct equal_pred
       
    45 {
       
    46     template<
       
    47           typename Iterator2
       
    48         , typename Iterator1
       
    49         >
       
    50     struct apply
       
    51     {
       
    52         typedef typename and_< 
       
    53               not_< is_same<Iterator1,LastIterator1> >
       
    54             , not_< is_same<Iterator2,LastIterator2> >
       
    55             , aux::iter_apply2<Predicate,Iterator1,Iterator2>
       
    56             >::type type;
       
    57     };
       
    58 };
       
    59 
       
    60 template<
       
    61       typename Sequence1
       
    62     , typename Sequence2
       
    63     , typename Predicate
       
    64     >
       
    65 struct equal_impl
       
    66 {
       
    67     typedef typename begin<Sequence1>::type first1_;
       
    68     typedef typename begin<Sequence2>::type first2_;
       
    69     typedef typename end<Sequence1>::type last1_;
       
    70     typedef typename end<Sequence2>::type last2_;
       
    71 
       
    72     typedef aux::iter_fold_if_impl<
       
    73           first1_
       
    74         , first2_
       
    75         , next<>
       
    76         , protect< aux::equal_pred<Predicate,last1_,last2_> >
       
    77         , void_
       
    78         , always<false_>
       
    79         > fold_;
       
    80 
       
    81     typedef typename fold_::iterator iter1_;
       
    82     typedef typename fold_::state iter2_;
       
    83     typedef and_<
       
    84           is_same<iter1_,last1_>
       
    85         , is_same<iter2_,last2_>
       
    86         > result_;
       
    87 
       
    88     typedef typename result_::type type;
       
    89 };
       
    90 
       
    91 
       
    92 } // namespace aux
       
    93 
       
    94 
       
    95 template<
       
    96       typename BOOST_MPL_AUX_NA_PARAM(Sequence1)
       
    97     , typename BOOST_MPL_AUX_NA_PARAM(Sequence2)
       
    98     , typename Predicate = is_same<_,_>
       
    99     >
       
   100 struct equal
       
   101     : aux::msvc_eti_base< 
       
   102           typename aux::equal_impl<Sequence1,Sequence2,Predicate>::type
       
   103         >::type
       
   104 {
       
   105     BOOST_MPL_AUX_LAMBDA_SUPPORT(2,equal,(Sequence1,Sequence2))
       
   106 };
       
   107 
       
   108 BOOST_MPL_AUX_NA_SPEC(2, equal)
       
   109 
       
   110 }}
       
   111 
       
   112 #endif // BOOST_MPL_EQUAL_HPP_INCLUDED