123456789101112131415161718192021222324252627282930313233343536373839404142434445464748 |
- #ifndef BOOST_HANA_DUPLICATE_HPP
- #define BOOST_HANA_DUPLICATE_HPP
- #include <boost/hana/fwd/duplicate.hpp>
- #include <boost/hana/concept/comonad.hpp>
- #include <boost/hana/config.hpp>
- #include <boost/hana/core/dispatch.hpp>
- #include <boost/hana/extend.hpp>
- #include <boost/hana/functional/id.hpp>
- BOOST_HANA_NAMESPACE_BEGIN
-
- template <typename W_>
- constexpr decltype(auto) duplicate_t::operator()(W_&& w) const {
- using W = typename hana::tag_of<W_>::type;
- using Duplicate = BOOST_HANA_DISPATCH_IF(duplicate_impl<W>,
- hana::Comonad<W>::value
- );
- #ifndef BOOST_HANA_CONFIG_DISABLE_CONCEPT_CHECKS
- static_assert(hana::Comonad<W>::value,
- "hana::duplicate(w) requires 'w' to be a Comonad");
- #endif
- return Duplicate::apply(static_cast<W_&&>(w));
- }
-
- template <typename W, bool condition>
- struct duplicate_impl<W, when<condition>> : default_ {
- template <typename X>
- static constexpr decltype(auto) apply(X&& x)
- { return hana::extend(static_cast<X&&>(x), hana::id); }
- };
- BOOST_HANA_NAMESPACE_END
- #endif
|