insert.hpp 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384
  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. #ifndef BOOST_HANA_TEST_AUTO_INSERT_HPP
  5. #define BOOST_HANA_TEST_AUTO_INSERT_HPP
  6. #include <boost/hana/assert.hpp>
  7. #include <boost/hana/equal.hpp>
  8. #include <boost/hana/insert.hpp>
  9. #include <boost/hana/integral_constant.hpp>
  10. #include "test_case.hpp"
  11. #include <laws/base.hpp>
  12. TestCase test_insert{[]{
  13. namespace hana = boost::hana;
  14. using hana::test::ct_eq;
  15. auto z = ct_eq<999>{};
  16. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  17. hana::insert(MAKE_TUPLE(ct_eq<0>{}), hana::size_c<0>, z),
  18. MAKE_TUPLE(z, ct_eq<0>{})
  19. ));
  20. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  21. hana::insert(MAKE_TUPLE(ct_eq<0>{}), hana::size_c<1>, z),
  22. MAKE_TUPLE(ct_eq<0>{}, z)
  23. ));
  24. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  25. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}), hana::size_c<0>, z),
  26. MAKE_TUPLE(z, ct_eq<0>{}, ct_eq<1>{})
  27. ));
  28. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  29. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}), hana::size_c<1>, z),
  30. MAKE_TUPLE(ct_eq<0>{}, z, ct_eq<1>{})
  31. ));
  32. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  33. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}), hana::size_c<2>, z),
  34. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, z)
  35. ));
  36. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  37. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}), hana::size_c<0>, z),
  38. MAKE_TUPLE(z, ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{})
  39. ));
  40. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  41. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}), hana::size_c<1>, z),
  42. MAKE_TUPLE(ct_eq<0>{}, z, ct_eq<1>{}, ct_eq<2>{})
  43. ));
  44. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  45. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}), hana::size_c<2>, z),
  46. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, z, ct_eq<2>{})
  47. ));
  48. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  49. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}), hana::size_c<3>, z),
  50. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, z)
  51. ));
  52. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  53. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::size_c<0>, z),
  54. MAKE_TUPLE(z, ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{})
  55. ));
  56. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  57. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::size_c<1>, z),
  58. MAKE_TUPLE(ct_eq<0>{}, z, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{})
  59. ));
  60. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  61. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::size_c<2>, z),
  62. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, z, ct_eq<2>{}, ct_eq<3>{})
  63. ));
  64. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  65. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::size_c<3>, z),
  66. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, z, ct_eq<3>{})
  67. ));
  68. BOOST_HANA_CONSTANT_CHECK(hana::equal(
  69. hana::insert(MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}), hana::size_c<4>, z),
  70. MAKE_TUPLE(ct_eq<0>{}, ct_eq<1>{}, ct_eq<2>{}, ct_eq<3>{}, z)
  71. ));
  72. }};
  73. #endif // !BOOST_HANA_TEST_AUTO_INSERT_HPP