2
0
mirror of https://github.com/boostorg/hana.git synced 2026-02-19 02:22:09 +00:00
Files
hana/example/applicative/ap.cpp
2014-07-27 16:11:59 -04:00

38 lines
1020 B
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/detail/constexpr.hpp>
#include <boost/hana/detail/static_assert.hpp>
#include <boost/hana/functional.hpp>
#include <boost/hana/list/instance.hpp>
#include <boost/hana/maybe.hpp>
using namespace boost::hana;
int main() {
//! [main]
BOOST_HANA_CONSTEXPR_LAMBDA auto f = _ + _;
BOOST_HANA_STATIC_ASSERT(
ap(lift<List>(f), list(1, 2), list(3, 4, 5))
==
list(
f(1, 3), f(1, 4), f(1, 5),
f(2, 3), f(2, 4), f(2, 5)
)
);
BOOST_HANA_CONSTEXPR_LAMBDA auto g = [](auto a, auto b, auto c) {
return a * b * c;
};
BOOST_HANA_STATIC_ASSERT(
ap(lift<Maybe>(g), just(1), just(2), just(3)) == just(1 * 2 * 3)
);
BOOST_HANA_STATIC_ASSERT(
ap(lift<Maybe>(g), just(1), nothing, just(3)) == nothing
);
//! [main]
}