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) 4 5 #include <boost/hana/assert.hpp> 6 #include <boost/hana/equal.hpp> 7 #include <boost/hana/optional.hpp> 8 #include <boost/hana/unpack.hpp> 9 10 #include <laws/base.hpp> 11 namespace hana = boost::hana; 12 13 main()14int main() { 15 hana::test::ct_eq<2> x{}; 16 hana::test::_injection<0> f{}; 17 18 BOOST_HANA_CONSTANT_CHECK(hana::equal( 19 hana::unpack(hana::nothing, f), 20 f() 21 )); 22 23 BOOST_HANA_CONSTANT_CHECK(hana::equal( 24 hana::unpack(hana::just(x), f), 25 f(x) 26 )); 27 28 // Previously, there was a bug that would make this fail. 29 auto non_const_nothing = hana::nothing; 30 BOOST_HANA_CONSTANT_CHECK(hana::equal( 31 hana::unpack(non_const_nothing, f), 32 f() 33 )); 34 } 35