123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200 |
- #ifndef BOOST_HOF_GUARD_FUNCTION_INFIX_H
- #define BOOST_HOF_GUARD_FUNCTION_INFIX_H
- #include <boost/hof/detail/delegate.hpp>
- #include <boost/hof/detail/callable_base.hpp>
- #include <boost/hof/always.hpp>
- #include <boost/hof/reveal.hpp>
- #include <boost/hof/detail/move.hpp>
- #include <boost/hof/detail/make.hpp>
- #include <boost/hof/detail/static_const_var.hpp>
- namespace boost { namespace hof {
-
- namespace detail{
- template<class T, class F>
- struct postfix_adaptor : F
- {
- T x;
- template<class X, class XF>
- constexpr postfix_adaptor(X&& xp, XF&& fp)
- BOOST_HOF_NOEXCEPT(BOOST_HOF_IS_NOTHROW_CONSTRUCTIBLE(F, XF&&) && BOOST_HOF_IS_NOTHROW_CONSTRUCTIBLE(T, X&&))
- : F(BOOST_HOF_FORWARD(XF)(fp)), x(BOOST_HOF_FORWARD(X)(xp))
- {}
- template<class... Ts>
- constexpr const F& base_function(Ts&&... xs) const noexcept
- {
- return boost::hof::always_ref(*this)(xs...);
- }
- BOOST_HOF_RETURNS_CLASS(postfix_adaptor);
- template<class... Ts>
- constexpr BOOST_HOF_SFINAE_RESULT(const F&, id_<T&&>, id_<Ts>...)
- operator()(Ts&&... xs) const BOOST_HOF_SFINAE_RETURNS
- (
- (BOOST_HOF_MANGLE_CAST(const F&)(BOOST_HOF_CONST_THIS->base_function(xs...)))(BOOST_HOF_RETURNS_C_CAST(T&&)(BOOST_HOF_CONST_THIS->x), BOOST_HOF_FORWARD(Ts)(xs)...)
- );
- template<class A>
- constexpr BOOST_HOF_SFINAE_RESULT(const F&, id_<T&&>, id_<A>)
- operator>(A&& a) const BOOST_HOF_SFINAE_RETURNS
- (
- (BOOST_HOF_MANGLE_CAST(const F&)(BOOST_HOF_CONST_THIS->base_function(a)))(BOOST_HOF_RETURNS_C_CAST(T&&)(BOOST_HOF_CONST_THIS->x), BOOST_HOF_FORWARD(A)(a))
- );
- };
- template<class T, class F>
- constexpr postfix_adaptor<T, F> make_postfix_adaptor(T&& x, F f)
- BOOST_HOF_NOEXCEPT_CONSTRUCTIBLE(postfix_adaptor<T, F>, T&&, F&&)
- {
- return postfix_adaptor<T, F>(BOOST_HOF_FORWARD(T)(x), static_cast<F&&>(f));
- }
- }
- template<class F>
- struct infix_adaptor : detail::callable_base<F>
- {
- typedef infix_adaptor fit_rewritable1_tag;
- BOOST_HOF_INHERIT_CONSTRUCTOR(infix_adaptor, detail::callable_base<F>);
- template<class... Ts>
- constexpr const detail::callable_base<F>& base_function(Ts&&... xs) const noexcept
- {
- return boost::hof::always_ref(*this)(xs...);
- }
- template<class... Ts>
- constexpr const detail::callable_base<F>& infix_base_function(Ts&&... xs) const noexcept
- {
- return boost::hof::always_ref(*this)(xs...);
- }
- BOOST_HOF_RETURNS_CLASS(infix_adaptor);
- template<class... Ts>
- constexpr auto operator()(Ts&&... xs) const BOOST_HOF_RETURNS
- (
- (BOOST_HOF_MANGLE_CAST(const detail::callable_base<F>&)(BOOST_HOF_CONST_THIS->base_function(xs...)))(BOOST_HOF_FORWARD(Ts)(xs)...)
- );
- };
- template<class T, class F>
- constexpr auto operator<(T&& x, const infix_adaptor<F>& i) BOOST_HOF_RETURNS
- (detail::make_postfix_adaptor(BOOST_HOF_FORWARD(T)(x), boost::hof::move(i.base_function(x))));
- namespace detail {
- template<class F>
- struct static_function_wrapper;
- template<class T, class F>
- auto operator<(T&& x, const boost::hof::detail::static_function_wrapper<F>& f) BOOST_HOF_RETURNS
- (
- detail::make_postfix_adaptor(BOOST_HOF_FORWARD(T)(x), boost::hof::move(f.base_function().infix_base_function()))
- );
- template<class F>
- struct static_default_function;
- template<class T, class F>
- auto operator<(T&& x, const boost::hof::detail::static_default_function<F>&) BOOST_HOF_RETURNS
- (
- detail::make_postfix_adaptor(BOOST_HOF_FORWARD(T)(x), boost::hof::move(F().infix_base_function()))
- );
- }
- template<class T, class F>
- constexpr auto operator<(T&& x, const boost::hof::reveal_adaptor<F>& f) BOOST_HOF_RETURNS
- (
- detail::make_postfix_adaptor(BOOST_HOF_FORWARD(T)(x), f.infix_base_function())
- );
- BOOST_HOF_DECLARE_STATIC_VAR(infix, detail::make<infix_adaptor>);
- }}
- #endif
|