mirror of
https://github.com/boostorg/hana.git
synced 2026-02-23 15:52:11 +00:00
37 lines
1.1 KiB
C++
37 lines
1.1 KiB
C++
/*
|
|
@copyright Louis Dionne 2014
|
|
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/applicative/mcd.hpp>
|
|
|
|
#include <boost/hana/detail/constexpr.hpp>
|
|
#include <boost/hana/detail/minimal/applicative.hpp>
|
|
#include <boost/hana/detail/minimal/comparable.hpp>
|
|
#include <boost/hana/detail/static_assert.hpp>
|
|
|
|
#include <tuple>
|
|
using namespace boost::hana;
|
|
|
|
|
|
template <int i>
|
|
constexpr auto x = detail::minimal::comparable<>(i);
|
|
|
|
template <typename mcd>
|
|
void test() {
|
|
constexpr auto a = detail::minimal::applicative<mcd>;
|
|
BOOST_HANA_CONSTEXPR_LAMBDA auto f = [](auto ...xs) {
|
|
return std::make_tuple(xs...);
|
|
};
|
|
|
|
BOOST_HANA_STATIC_ASSERT(ap(a(f), a(x<0>)) == a(f(x<0>)));
|
|
BOOST_HANA_STATIC_ASSERT(ap(a(f), a(x<0>), a(x<1>)) == a(f(x<0>, x<1>)));
|
|
BOOST_HANA_STATIC_ASSERT(ap(a(f), a(x<0>), a(x<1>), a(x<2>)) == a(f(x<0>, x<1>, x<2>)));
|
|
BOOST_HANA_STATIC_ASSERT(ap(a(f), a(x<0>), a(x<1>), a(x<2>), a(x<3>)) == a(f(x<0>, x<1>, x<2>, x<3>)));
|
|
}
|
|
|
|
int main() {
|
|
test<Applicative::mcd>();
|
|
}
|