length.cpp 1.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041
  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. #include <boost/hana/assert.hpp>
  5. #include <boost/hana/basic_tuple.hpp>
  6. #include <boost/hana/equal.hpp>
  7. #include <boost/hana/integral_constant.hpp>
  8. #include <boost/hana/length.hpp>
  9. #include <laws/base.hpp>
  10. namespace hana = boost::hana;
  11. using hana::test::ct_eq;
  12. int main() {
  13. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  14. hana::length(hana::make_basic_tuple()),
  15. hana::size_c<0>
  16. ));
  17. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  18. hana::length(hana::make_basic_tuple(ct_eq<0>{})),
  19. hana::size_c<1>
  20. ));
  21. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  22. hana::length(hana::make_basic_tuple(ct_eq<0>{}, ct_eq<1>{})),
  23. hana::size_c<2>
  24. ));
  25. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  26. hana::length(hana::make_basic_tuple(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{})),
  27. hana::size_c<3>
  28. ));
  29. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  30. hana::length(hana::make_basic_tuple(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{})),
  31. hana::size_c<4>
  32. ));
  33. }