123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208 |
- // Copyright (C) 2016-2018 T. Zachary Laine
- //
- // 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)
- #include <boost/yap/expression.hpp>
- #include <boost/mpl/assert.hpp>
- #include <boost/test/minimal.hpp>
- template<typename T>
- using term = boost::yap::terminal<boost::yap::expression, T>;
- template<typename T>
- using ref = boost::yap::expression_ref<boost::yap::expression, T>;
- namespace yap = boost::yap;
- namespace bh = boost::hana;
- template<boost::yap::expr_kind Kind, typename Tuple>
- struct user_expr
- {
- static boost::yap::expr_kind const kind = Kind;
- Tuple elements;
- };
- BOOST_YAP_USER_BINARY_OPERATOR(plus, user_expr, user_expr)
- template<typename T>
- using user_term = boost::yap::terminal<user_expr, T>;
- template<typename T>
- using user_ref = boost::yap::expression_ref<user_expr, T>;
- int test_main(int, char * [])
- {
- {
- {
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(1.0)), double &&>));
- BOOST_CHECK(yap::value(1.0) == 1.0);
- }
- {
- double d = 2.0;
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(d)), double &>));
- BOOST_CHECK(yap::value(d) == 2.0);
- }
- {
- double const d = 3.0;
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(d)), double const &>));
- BOOST_CHECK(yap::value(d) == 3.0);
- }
- }
- {
- {
- term<double> td = {{1.0}};
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(std::move(td))), double &&>));
- BOOST_CHECK(yap::value(std::move(td)) == 1.0);
- }
- {
- term<double> td = {{2.0}};
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(td)), double &>));
- BOOST_CHECK(yap::value(td) == 2.0);
- }
- {
- term<double> const td = {{3.0}};
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(td)), double const &>));
- BOOST_CHECK(yap::value(td) == 3.0);
- }
- term<double> unity = {{1.0}};
- using plus_expr_type = yap::expression<
- yap::expr_kind::plus,
- bh::tuple<ref<term<double> &>, term<int>>>;
- plus_expr_type plus_expr = unity + term<int>{{1}};
- {
- ref<term<double> &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(std::move(ref))), double &>));
- }
- {
- ref<term<double> &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(ref)), double &>));
- }
- {
- ref<term<double> &> const ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(ref)), double &>));
- }
- {
- term<double> const unity = {{1.0}};
- yap::expression<
- yap::expr_kind::plus,
- bh::tuple<ref<term<double> const &>, term<int>>>
- plus_expr = unity + term<int>{{1}};
- {
- ref<term<double> const &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<
- decltype(yap::value(std::move(ref))),
- double const &>));
- }
- {
- ref<term<double> const &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(ref)), double const &>));
- }
- {
- ref<term<double> const &> const ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(ref)), double const &>));
- }
- }
- }
- {
- {
- user_term<double> td = {{1.0}};
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(std::move(td))), double &&>));
- BOOST_CHECK(yap::value(std::move(td)) == 1.0);
- }
- {
- user_term<double> td = {{2.0}};
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(td)), double &>));
- BOOST_CHECK(yap::value(td) == 2.0);
- }
- {
- user_term<double> const td = {{3.0}};
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(td)), double const &>));
- BOOST_CHECK(yap::value(td) == 3.0);
- }
- user_term<double> unity = {{1.0}};
- using plus_expr_type = user_expr<
- yap::expr_kind::plus,
- bh::tuple<user_ref<user_term<double> &>, user_term<int>>>;
- plus_expr_type plus_expr = unity + user_term<int>{{1}};
- {
- user_ref<user_term<double> &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(std::move(ref))), double &>));
- }
- {
- user_ref<user_term<double> &> ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(ref)), double &>));
- }
- {
- user_ref<user_term<double> &> const ref = bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<decltype(yap::value(ref)), double &>));
- }
- {
- user_term<double> const unity = {{1.0}};
- user_expr<
- yap::expr_kind::plus,
- bh::tuple<user_ref<user_term<double> const &>, user_term<int>>>
- plus_expr = unity + user_term<int>{{1}};
- {
- user_ref<user_term<double> const &> ref =
- bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT((std::is_same<
- decltype(yap::value(std::move(ref))),
- double const &>));
- }
- {
- user_ref<user_term<double> const &> ref =
- bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(ref)), double const &>));
- }
- {
- user_ref<user_term<double> const &> const ref =
- bh::front(plus_expr.elements);
- BOOST_MPL_ASSERT(
- (std::is_same<decltype(yap::value(ref)), double const &>));
- }
- }
- }
- return 0;
- }
|