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/experimental/view.hpp> 8 #include <boost/hana/unpack.hpp> 9 10 #include <laws/base.hpp> 11 namespace hana = boost::hana; 12 using hana::test::ct_eq; 13 14 main()15int main() { 16 auto f = hana::test::_injection<0>{}; 17 18 { 19 auto single = hana::experimental::single_view(ct_eq<0>{}); 20 BOOST_HANA_CONSTANT_CHECK(hana::equal( 21 hana::unpack(single, f), 22 f(ct_eq<0>{}) 23 )); 24 } 25 } 26