1 // Copyright Louis Dionne 2013-2017
2 // Distributed under the Boost Software License, Version 1.0.
3 // (See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
5 #ifndef BOOST_HANA_TEST_AUTO_TAKE_WHILE_HPP
6 #define BOOST_HANA_TEST_AUTO_TAKE_WHILE_HPP
8 #include <boost/hana/assert.hpp>
9 #include <boost/hana/equal.hpp>
10 #include <boost/hana/not_equal.hpp>
11 #include <boost/hana/take_while.hpp>
13 #include "test_case.hpp"
14 #include <laws/base.hpp>
17 TestCase test_take_while{[]{
18 namespace hana = boost::hana;
19 using hana::test::ct_eq;
21 auto z = ct_eq<999>{};
23 BOOST_HANA_CONSTANT_CHECK(hana::equal(
24 hana::take_while(MAKE_TUPLE(), hana::not_equal.to(z)),
28 BOOST_HANA_CONSTANT_CHECK(hana::equal(
29 hana::take_while(MAKE_TUPLE(ct_eq<1>{}), hana::not_equal.to(z)),
30 MAKE_TUPLE(ct_eq<1>{})
32 BOOST_HANA_CONSTANT_CHECK(hana::equal(
33 hana::take_while(MAKE_TUPLE(z), hana::not_equal.to(z)),
37 BOOST_HANA_CONSTANT_CHECK(hana::equal(
38 hana::take_while(MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{}), hana::not_equal.to(z)),
39 MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{})
41 BOOST_HANA_CONSTANT_CHECK(hana::equal(
42 hana::take_while(MAKE_TUPLE(ct_eq<1>{}, z), hana::not_equal.to(z)),
43 MAKE_TUPLE(ct_eq<1>{})
45 BOOST_HANA_CONSTANT_CHECK(hana::equal(
46 hana::take_while(MAKE_TUPLE(z, ct_eq<2>{}), hana::not_equal.to(z)),
50 BOOST_HANA_CONSTANT_CHECK(hana::equal(
51 hana::take_while(MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::not_equal.to(z)),
52 MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{})
54 BOOST_HANA_CONSTANT_CHECK(hana::equal(
55 hana::take_while(MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{}, z), hana::not_equal.to(z)),
56 MAKE_TUPLE(ct_eq<1>{}, ct_eq<2>{})
58 BOOST_HANA_CONSTANT_CHECK(hana::equal(
59 hana::take_while(MAKE_TUPLE(ct_eq<1>{}, z, ct_eq<3>{}), hana::not_equal.to(z)),
60 MAKE_TUPLE(ct_eq<1>{})
62 BOOST_HANA_CONSTANT_CHECK(hana::equal(
63 hana::take_while(MAKE_TUPLE(z, ct_eq<2>{}, ct_eq<3>{}), hana::not_equal.to(z)),
68 #endif // !BOOST_HANA_TEST_AUTO_TAKE_WHILE_HPP