1 files changed, 101 insertions, 0 deletions
diff --git a/src/boost/libs/hana/test/ext/std/integer_sequence/find_if.cpp b/src/boost/libs/hana/test/ext/std/integer_sequence/find_if.cpp
new file mode 100644
index 000000000..4c904ed65
--- /dev/null
+++ b/src/boost/libs/hana/test/ext/std/integer_sequence/find_if.cpp
@@ -0,0 +1,101 @@
+// Copyright Louis Dionne 2013-2017
+// Distributed under the Boost Software License, Version 1.0.
+// (See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
+
+#include <boost/hana/assert.hpp>
+#include <boost/hana/equal.hpp>
+#include <boost/hana/ext/std/integer_sequence.hpp>
+#include <boost/hana/ext/std/integral_constant.hpp>
+#include <boost/hana/find_if.hpp>
+#include <boost/hana/optional.hpp>
+
+#include <cstddef>
+#include <type_traits>
+#include <utility>
+namespace hana = boost::hana;
+
+
+struct undefined { };
+
+
+int main() {
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<>{},
+                      hana::equal.to(undefined{})),
+        hana::nothing
+    ));
+
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 0>{})),
+        hana::just(std::integral_constant<std::size_t, 0>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 1>{})),
+        hana::nothing
+    ));
+
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 0>{})),
+        hana::just(std::integral_constant<std::size_t, 0>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 1>{})),
+        hana::just(std::integral_constant<std::size_t, 1>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 2>{})),
+        hana::nothing
+    ));
+
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 0>{})),
+        hana::just(std::integral_constant<std::size_t, 0>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 1>{})),
+        hana::just(std::integral_constant<std::size_t, 1>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 2>{})),
+        hana::just(std::integral_constant<std::size_t, 2>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 3>{})),
+        hana::nothing
+    ));
+
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2, 3>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 0>{})),
+        hana::just(std::integral_constant<std::size_t, 0>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2, 3>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 1>{})),
+        hana::just(std::integral_constant<std::size_t, 1>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2, 3>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 2>{})),
+        hana::just(std::integral_constant<std::size_t, 2>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2, 3>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 3>{})),
+        hana::just(std::integral_constant<std::size_t, 3>{})
+    ));
+    BOOST_HANA_CONSTANT_CHECK(hana::equal(
+        hana::find_if(std::index_sequence<0, 1, 2, 3>{},
+                      hana::equal.to(std::integral_constant<std::size_t, 4>{})),
+        hana::nothing
+    ));
+}