logical.cpp 2.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. #include <boost/hana/assert.hpp>
  5. #include <boost/hana/concept/logical.hpp>
  6. #include <boost/hana/equal.hpp>
  7. #include <boost/hana/eval_if.hpp>
  8. #include <boost/hana/functional/always.hpp>
  9. #include <boost/hana/not.hpp>
  10. #include <boost/hana/tuple.hpp>
  11. #include <boost/hana/while.hpp>
  12. #include <laws/logical.hpp>
  13. #include <vector>
  14. namespace hana = boost::hana;
  15. int main() {
  16. hana::test::TestLogical<bool>{hana::make_tuple(true, false)};
  17. // eval_if
  18. {
  19. BOOST_HANA_CONSTEXPR_CHECK(hana::equal(
  20. hana::eval_if(true, hana::always(1), hana::always(2)),
  21. 1
  22. ));
  23. BOOST_HANA_CONSTEXPR_CHECK(hana::equal(
  24. hana::eval_if(false, hana::always(1), hana::always(2)),
  25. 2
  26. ));
  27. }
  28. // not_
  29. {
  30. BOOST_HANA_CONSTEXPR_CHECK(hana::equal(hana::not_(true), false));
  31. BOOST_HANA_CONSTEXPR_CHECK(hana::equal(hana::not_(false), true));
  32. }
  33. // while_
  34. {
  35. auto less_than = [](auto n) {
  36. return [n](auto v) { return v.size() < n; };
  37. };
  38. auto f = [](auto v) {
  39. v.push_back(v.size());
  40. return v;
  41. };
  42. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  43. hana::while_(less_than(0u), std::vector<int>{}, f),
  44. std::vector<int>{}
  45. ));
  46. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  47. hana::while_(less_than(1u), std::vector<int>{}, f),
  48. std::vector<int>{0}
  49. ));
  50. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  51. hana::while_(less_than(2u), std::vector<int>{}, f),
  52. std::vector<int>{0, 1}
  53. ));
  54. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  55. hana::while_(less_than(3u), std::vector<int>{}, f),
  56. std::vector<int>{0, 1, 2}
  57. ));
  58. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  59. hana::while_(less_than(4u), std::vector<int>{}, f),
  60. std::vector<int>{0, 1, 2, 3}
  61. ));
  62. // Make sure it can be called with an lvalue state:
  63. std::vector<int> v{};
  64. BOOST_HANA_RUNTIME_CHECK(hana::equal(
  65. hana::while_(less_than(4u), v, f),
  66. std::vector<int>{0, 1, 2, 3}
  67. ));
  68. }
  69. }