blob: 54da37bc8b2d82c49bbd2f55d184a11551a67479 [file] [log] [blame]
/*=============================================================================
Copyright (c) 2007 Tobias Schwinger
Use modification and distribution are subject to 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).
==============================================================================*/
#include <boost/detail/lightweight_test.hpp>
#include <boost/fusion/view/repetitive_view.hpp>
#include <boost/fusion/container/vector.hpp>
#include <boost/fusion/view/joint_view.hpp>
#include <boost/fusion/algorithm/transformation/zip.hpp>
#include <boost/fusion/algorithm/iteration/for_each.hpp>
#include <boost/type_traits/is_same.hpp>
#include <boost/fusion/sequence/intrinsic/begin.hpp>
#include <boost/fusion/iterator/next.hpp>
#include <boost/fusion/functional/generation/make_fused_procedure.hpp>
struct check_equal
{
template<typename LHS, typename RHS>
void operator()(LHS const& lhs, RHS const& rhs) const
{
BOOST_TEST(( boost::is_same<LHS,RHS>::value ));
BOOST_TEST(( lhs == rhs ));
}
};
int main()
{
using namespace boost::fusion;
typedef boost::fusion::vector<int,long,float,double> seq_t;
seq_t seq(1,2l,3.0f,4.0);
typedef repetitive_view<seq_t> view_t;
view_t view(seq);
typedef joint_view<seq_t,seq_t> seq_twice_t;
typedef joint_view<seq_t,seq_twice_t> seq_repeated_t;
seq_twice_t seq_twice(seq,seq);
seq_repeated_t seq_repeated(seq,seq_twice);
for_each(zip(view,seq_repeated), make_fused_procedure(check_equal()));
return boost::report_errors();
}