123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475 |
- #ifndef BOOST_HANA_FWD_MONADIC_COMPOSE_HPP
- #define BOOST_HANA_FWD_MONADIC_COMPOSE_HPP
- #include <boost/hana/config.hpp>
- #include <boost/hana/core/when.hpp>
- BOOST_HANA_NAMESPACE_BEGIN
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- #ifdef BOOST_HANA_DOXYGEN_INVOKED
- constexpr auto monadic_compose = [](auto&& f, auto&& g) {
- return [perfect-capture](auto&& x) -> decltype(auto) {
- return hana::chain(forwarded(g)(forwarded(x)), forwarded(f));
- };
- };
- #else
- struct monadic_compose_t {
- template <typename F, typename G>
- constexpr auto operator()(F&& f, G&& g) const;
- };
- constexpr monadic_compose_t monadic_compose{};
- #endif
- BOOST_HANA_NAMESPACE_END
- #endif
|