mirror of
https://github.com/bolero-MURAKAMI/Sprout.git
synced 2024-12-23 21:25:49 +00:00
delete breed/*
This commit is contained in:
parent
7f6081e0cc
commit
5bf20db49b
21 changed files with 0 additions and 4399 deletions
|
@ -1,128 +0,0 @@
|
|||
#ifndef SPROUT_BREED_ARGS_HPP
|
||||
#define SPROUT_BREED_ARGS_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/utility/pack.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename T>
|
||||
struct ref_only
|
||||
: public std::integral_constant<
|
||||
bool,
|
||||
std::is_function<T>::value
|
||||
>
|
||||
{};
|
||||
|
||||
template<typename Expr>
|
||||
struct expr_traits {
|
||||
public:
|
||||
typedef Expr value_type;
|
||||
typedef Expr& reference;
|
||||
typedef Expr const& const_reference;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct expr_traits<Expr&> {
|
||||
public:
|
||||
typedef Expr value_type;
|
||||
typedef Expr& reference;
|
||||
typedef Expr& const_reference;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct expr_traits<Expr const&> {
|
||||
public:
|
||||
typedef Expr value_type;
|
||||
typedef Expr const& reference;
|
||||
typedef Expr const& const_reference;
|
||||
};
|
||||
|
||||
template<typename T>
|
||||
struct term_traits {
|
||||
public:
|
||||
typedef T value_type;
|
||||
typedef T& reference;
|
||||
typedef T const& const_reference;
|
||||
};
|
||||
template<typename T>
|
||||
struct term_traits<T&> {
|
||||
public:
|
||||
typedef typename std::conditional<sprout::breed::detail::ref_only<T>::value, T&, T>::type value_type;
|
||||
typedef T& reference;
|
||||
typedef T& const_reference;
|
||||
};
|
||||
template<typename T>
|
||||
struct term_traits<T const&> {
|
||||
public:
|
||||
typedef T value_type;
|
||||
typedef T const& reference;
|
||||
typedef T const& const_reference;
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct term_traits<T (&)[N]> {
|
||||
public:
|
||||
typedef T value_type[N];
|
||||
typedef T (&reference)[N];
|
||||
typedef T (&const_reference)[N];
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct term_traits<T const (&)[N]> {
|
||||
public:
|
||||
typedef T value_type[N];
|
||||
typedef T const (&reference)[N];
|
||||
typedef T const (&const_reference)[N];
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct term_traits<T[N]> {
|
||||
public:
|
||||
typedef T value_type[N];
|
||||
typedef T (&reference)[N];
|
||||
typedef T const (&const_reference)[N];
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct term_traits<T const[N]> {
|
||||
public:
|
||||
typedef T value_type[N];
|
||||
typedef T const (&reference)[N];
|
||||
typedef T const (&const_reference)[N];
|
||||
};
|
||||
} // namespace detail
|
||||
|
||||
namespace argsns_ {
|
||||
//
|
||||
// term
|
||||
//
|
||||
template<typename Arg>
|
||||
struct term {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long arity = 0;
|
||||
public:
|
||||
template<long N>
|
||||
struct child
|
||||
: public sprout::tppack_at<N, Arg>
|
||||
{};
|
||||
public:
|
||||
typedef Arg back_;
|
||||
};
|
||||
//
|
||||
// list
|
||||
//
|
||||
template<typename... Args>
|
||||
struct list {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long arity = sizeof...(Args);
|
||||
public:
|
||||
template<long N>
|
||||
struct child
|
||||
: public sprout::tppack_at<N, Args...>
|
||||
{};
|
||||
public:
|
||||
typedef typename child<sizeof...(Args) - 1>::type back_;
|
||||
};
|
||||
} // namespace argsns_ {
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_ARGS_HPP
|
|
@ -1,10 +0,0 @@
|
|||
#ifndef SPROUT_BREED_BREED_HPP
|
||||
#define SPROUT_BREED_BREED_HPP
|
||||
|
||||
#include <sprout/breed/core.hpp>
|
||||
//#include <sprout/breed/debug.hpp>
|
||||
//#include <sprout/breed/context.hpp>
|
||||
//#include <sprout/breed/transform.hpp>
|
||||
//#include <sprout/breed/functional.hpp>
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_BREED_HPP
|
|
@ -1,707 +0,0 @@
|
|||
#ifndef SPROUT_BREED_BREED_FWD_HPP
|
||||
#define SPROUT_BREED_BREED_FWD_HPP
|
||||
|
||||
#include <cstddef>
|
||||
#include <climits>
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
typedef char yes_type;
|
||||
typedef char (&no_type)[2];
|
||||
|
||||
template<long N>
|
||||
struct sized_type {
|
||||
public:
|
||||
typedef char (&type)[N];
|
||||
};
|
||||
|
||||
struct dont_care;
|
||||
struct undefined;
|
||||
struct not_a_valid_type;
|
||||
|
||||
struct private_type_ {
|
||||
public:
|
||||
SPROUT_CONSTEXPR private_type_ operator,(int) const; // ???
|
||||
};
|
||||
|
||||
template<typename T>
|
||||
struct uncvref {
|
||||
public:
|
||||
typedef T type;
|
||||
};
|
||||
template<typename T>
|
||||
struct uncvref<T const> {
|
||||
public:
|
||||
typedef T type;
|
||||
};
|
||||
template<typename T>
|
||||
struct uncvref<T&> {
|
||||
public:
|
||||
typedef T type;
|
||||
};
|
||||
template<typename T>
|
||||
struct uncvref<T const&> {
|
||||
public:
|
||||
typedef T type;
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct uncvref<T const[N]> {
|
||||
public:
|
||||
typedef T type[N];
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct uncvref<T (&)[N]> {
|
||||
public:
|
||||
typedef T type[N];
|
||||
};
|
||||
template<typename T, std::size_t N>
|
||||
struct uncvref<T const (&)[N]> {
|
||||
public:
|
||||
typedef T type[N];
|
||||
};
|
||||
|
||||
struct ignore {
|
||||
public:
|
||||
ignore() = default;
|
||||
ignore(ignore const&) = default;
|
||||
ignore(ignore&&) = default;
|
||||
template<typename T>
|
||||
SPROUT_CONSTEXPR ignore(T const&) {}
|
||||
};
|
||||
|
||||
struct _default;
|
||||
|
||||
struct not_a_domain;
|
||||
struct not_a_grammar;
|
||||
struct not_a_generator;
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_transform_;
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_aggregate_;
|
||||
} // namespace detail
|
||||
|
||||
typedef sprout::breed::detail::ignore const ignore;
|
||||
|
||||
namespace argsns_ {
|
||||
template<typename Arg>
|
||||
struct term;
|
||||
|
||||
template<typename... Args>
|
||||
struct list;
|
||||
} // namespace argsns_
|
||||
using namespace argsns_;
|
||||
|
||||
namespace tagns_ {
|
||||
namespace tag {
|
||||
struct terminal;
|
||||
struct unary_plus;
|
||||
struct negate;
|
||||
struct dereference;
|
||||
struct complement;
|
||||
struct address_of;
|
||||
struct logical_not;
|
||||
struct pre_inc;
|
||||
struct pre_dec;
|
||||
struct post_inc;
|
||||
struct post_dec;
|
||||
|
||||
struct shift_left;
|
||||
struct shift_right;
|
||||
struct multiplies;
|
||||
struct divides;
|
||||
struct modulus;
|
||||
struct plus;
|
||||
struct minus;
|
||||
struct less;
|
||||
struct greater;
|
||||
struct less_equal;
|
||||
struct greater_equal;
|
||||
struct equal_to;
|
||||
struct not_equal_to;
|
||||
struct logical_or;
|
||||
struct logical_and;
|
||||
struct bitwise_and;
|
||||
struct bitwise_or;
|
||||
struct bitwise_xor;
|
||||
struct comma;
|
||||
struct mem_ptr;
|
||||
|
||||
struct assign;
|
||||
struct shift_left_assign;
|
||||
struct shift_right_assign;
|
||||
struct multiplies_assign;
|
||||
struct divides_assign;
|
||||
struct modulus_assign;
|
||||
struct plus_assign;
|
||||
struct minus_assign;
|
||||
struct bitwise_and_assign;
|
||||
struct bitwise_or_assign;
|
||||
struct bitwise_xor_assign;
|
||||
struct subscript;
|
||||
struct member;
|
||||
struct if_else_;
|
||||
struct function;
|
||||
|
||||
// Fusion tags
|
||||
struct breed_expr;
|
||||
struct breed_expr_iterator;
|
||||
struct breed_flat_view;
|
||||
} // namespace tag
|
||||
} // namespace tagns_
|
||||
using namespace tagns_;
|
||||
|
||||
template<typename Expr>
|
||||
struct tag_of;
|
||||
|
||||
struct _;
|
||||
|
||||
struct default_generator;
|
||||
|
||||
struct basic_default_generator;
|
||||
|
||||
template<template<typename> class Extends>
|
||||
struct generator;
|
||||
|
||||
template<template<typename> class Extends>
|
||||
struct pod_generator;
|
||||
|
||||
struct by_value_generator;
|
||||
|
||||
template<typename First, typename Second>
|
||||
struct compose_generators;
|
||||
|
||||
template<typename Generator, typename Void = void>
|
||||
struct wants_basic_expr;
|
||||
|
||||
template<typename Generator>
|
||||
struct use_basic_expr;
|
||||
|
||||
namespace domainns_ {
|
||||
typedef sprout::breed::detail::not_a_domain no_super_domain;
|
||||
|
||||
template<
|
||||
typename Generator = sprout::breed::default_generator,
|
||||
typename Grammar = sprout::breed::_,
|
||||
typename Super = sprout::breed::domainns_::no_super_domain
|
||||
>
|
||||
struct domain;
|
||||
|
||||
struct default_domain;
|
||||
|
||||
struct basic_default_domain;
|
||||
|
||||
struct deduce_domain;
|
||||
|
||||
template<
|
||||
typename Domain,
|
||||
typename Tag,
|
||||
typename Args,
|
||||
bool WantsBasicExpr = sprout::breed::wants_basic_expr<typename Domain::breed_generator>::value
|
||||
>
|
||||
struct base_expr;
|
||||
} // namespace domainns_
|
||||
using namespace domainns_;
|
||||
|
||||
namespace exprns_ {
|
||||
template<typename Tag, typename Args, long Arity = Args::arity>
|
||||
struct basic_expr;
|
||||
|
||||
template<typename Tag, typename Args, long Arity = Args::arity>
|
||||
struct expr;
|
||||
|
||||
template<
|
||||
typename Expr,
|
||||
typename Derived,
|
||||
typename Domain = sprout::breed::default_domain,
|
||||
long Arity = Expr::breed_arity_c
|
||||
>
|
||||
struct extends;
|
||||
|
||||
template<typename This, typename Fun, typename Domain>
|
||||
struct virtual_member;
|
||||
|
||||
struct is_breed_expr;
|
||||
}
|
||||
using exprns_::expr;
|
||||
using exprns_::basic_expr;
|
||||
using exprns_::extends;
|
||||
using exprns_::is_breed_expr;
|
||||
|
||||
template<typename... Args>
|
||||
struct or_;
|
||||
|
||||
template<typename... Args>
|
||||
struct and_;
|
||||
|
||||
template<typename Grammar>
|
||||
struct not_;
|
||||
|
||||
template<
|
||||
typename Condition,
|
||||
typename Then = sprout::breed::_,
|
||||
typename Else = sprout::breed::not_<sprout::breed::_>
|
||||
>
|
||||
struct if_;
|
||||
|
||||
template<typename Cases, typename Transform = sprout::breed::tag_of<sprout::breed::_>()>
|
||||
struct switch_;
|
||||
|
||||
template<typename T>
|
||||
struct exact;
|
||||
|
||||
template<typename T>
|
||||
struct convertible_to;
|
||||
|
||||
template<typename Grammar>
|
||||
struct vararg;
|
||||
|
||||
SPROUT_STATIC_CONSTEXPR int N = (INT_MAX >> 10);
|
||||
|
||||
namespace context {
|
||||
struct null_context;
|
||||
|
||||
template<typename Expr, typename Context, long Arity = Expr::breed_arity_c>
|
||||
struct null_eval;
|
||||
|
||||
struct default_context;
|
||||
|
||||
template<
|
||||
typename Expr,
|
||||
typename Context,
|
||||
typename Tag = typename Expr::breed_tag,
|
||||
long Arity = Expr::breed_arity_c
|
||||
>
|
||||
struct default_eval;
|
||||
|
||||
template<typename Derived, typename DefaultCtx = sprout::breed::context::default_context>
|
||||
struct callable_context;
|
||||
|
||||
template<typename Expr, typename Context, long Arity = Expr::breed_arity_c>
|
||||
struct callable_eval;
|
||||
} // namespace context
|
||||
|
||||
using context::null_context;
|
||||
using context::null_eval;
|
||||
using context::default_context;
|
||||
using context::default_eval;
|
||||
using context::callable_context;
|
||||
using context::callable_eval;
|
||||
|
||||
namespace utility {
|
||||
template<typename T, typename Domain = sprout::breed::default_domain>
|
||||
struct literal;
|
||||
} // namespace context
|
||||
|
||||
using utility::literal;
|
||||
|
||||
namespace result_of {
|
||||
template<typename T, typename Domain = sprout::breed::default_domain>
|
||||
struct as_expr;
|
||||
|
||||
template<typename T, typename Domain = sprout::breed::default_domain>
|
||||
struct as_child;
|
||||
|
||||
template<typename Expr, typename N = std::integral_constant<long, 0> >
|
||||
struct child;
|
||||
|
||||
template<typename Expr, long N>
|
||||
struct child_c;
|
||||
|
||||
template<typename Expr>
|
||||
struct left;
|
||||
|
||||
template<typename Expr>
|
||||
struct right;
|
||||
|
||||
template<typename Expr>
|
||||
struct deep_copy;
|
||||
|
||||
template<typename Expr, typename Context>
|
||||
struct eval;
|
||||
|
||||
template<
|
||||
typename Tag,
|
||||
typename DomainOrArg,
|
||||
typename... Args
|
||||
>
|
||||
struct make_expr;
|
||||
|
||||
template<typename Tag, typename DomainOrSequence, typename SequenceOrVoid = void, typename Void = void>
|
||||
struct unpack_expr;
|
||||
} // namespace result_of
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_expr;
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_domain;
|
||||
|
||||
template<typename SubDomain, typename SuperDomain>
|
||||
struct is_sub_domain_of;
|
||||
|
||||
template<typename Expr>
|
||||
struct arity_of;
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct domain_of;
|
||||
|
||||
template<typename Expr, typename Grammar>
|
||||
struct matches;
|
||||
|
||||
template<typename Tag, typename Arg>
|
||||
struct unary_expr;
|
||||
|
||||
template<typename Tag, typename Left, typename Right>
|
||||
struct binary_expr;
|
||||
|
||||
template<typename Tag, typename... Args>
|
||||
struct nary_expr;
|
||||
|
||||
template<typename T>
|
||||
struct terminal;
|
||||
template<typename T>
|
||||
struct unary_plus;
|
||||
template<typename T>
|
||||
struct negate;
|
||||
template<typename T>
|
||||
struct dereference;
|
||||
template<typename T>
|
||||
struct complement;
|
||||
template<typename T>
|
||||
struct address_of;
|
||||
template<typename T>
|
||||
struct logical_not;
|
||||
template<typename T>
|
||||
struct pre_inc;
|
||||
template<typename T>
|
||||
struct pre_dec;
|
||||
template<typename T>
|
||||
struct post_inc;
|
||||
template<typename T>
|
||||
struct post_dec;
|
||||
|
||||
template<typename T, typename U>
|
||||
struct shift_left;
|
||||
template<typename T, typename U>
|
||||
struct shift_right;
|
||||
template<typename T, typename U>
|
||||
struct multiplies;
|
||||
template<typename T, typename U>
|
||||
struct divides;
|
||||
template<typename T, typename U>
|
||||
struct modulus;
|
||||
template<typename T, typename U>
|
||||
struct plus;
|
||||
template<typename T, typename U>
|
||||
struct minus;
|
||||
template<typename T, typename U>
|
||||
struct less;
|
||||
template<typename T, typename U>
|
||||
struct greater;
|
||||
template<typename T, typename U>
|
||||
struct less_equal;
|
||||
template<typename T, typename U>
|
||||
struct greater_equal;
|
||||
template<typename T, typename U>
|
||||
struct equal_to;
|
||||
template<typename T, typename U>
|
||||
struct not_equal_to;
|
||||
template<typename T, typename U>
|
||||
struct logical_or;
|
||||
template<typename T, typename U>
|
||||
struct logical_and;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_and;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_or;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_xor;
|
||||
template<typename T, typename U>
|
||||
struct comma;
|
||||
template<typename T, typename U>
|
||||
struct mem_ptr;
|
||||
|
||||
template<typename T, typename U>
|
||||
struct assign;
|
||||
template<typename T, typename U>
|
||||
struct shift_left_assign;
|
||||
template<typename T, typename U>
|
||||
struct shift_right_assign;
|
||||
template<typename T, typename U>
|
||||
struct multiplies_assign;
|
||||
template<typename T, typename U>
|
||||
struct divides_assign;
|
||||
template<typename T, typename U>
|
||||
struct modulus_assign;
|
||||
template<typename T, typename U>
|
||||
struct plus_assign;
|
||||
template<typename T, typename U>
|
||||
struct minus_assign;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_and_assign;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_or_assign;
|
||||
template<typename T, typename U>
|
||||
struct bitwise_xor_assign;
|
||||
template<typename T, typename U>
|
||||
struct subscript;
|
||||
template<typename T, typename U>
|
||||
struct member;
|
||||
template<typename T, typename U, typename V>
|
||||
struct if_else_;
|
||||
|
||||
template<typename... Args>
|
||||
struct function;
|
||||
|
||||
namespace functional {
|
||||
struct left;
|
||||
struct right;
|
||||
struct eval;
|
||||
struct deep_copy;
|
||||
|
||||
template<typename Domain = sprout::breed::default_domain>
|
||||
struct as_expr;
|
||||
|
||||
template<typename Domain = sprout::breed::default_domain>
|
||||
struct as_child;
|
||||
|
||||
template<typename N = std::integral_constant<long, 0> >
|
||||
struct child;
|
||||
|
||||
template<long N>
|
||||
struct child_c;
|
||||
|
||||
template<typename Tag, typename Domain = deduce_domain>
|
||||
struct make_expr;
|
||||
|
||||
template<typename Tag, typename Domain = deduce_domain>
|
||||
struct unpack_expr;
|
||||
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::terminal> make_terminal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::unary_plus> make_unary_plus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::negate> make_negate;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::dereference> make_dereference;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::complement> make_complement;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::address_of> make_address_of;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_not> make_logical_not;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::pre_inc> make_pre_inc;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::pre_dec> make_pre_dec;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::post_inc> make_post_inc;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::post_dec> make_post_dec;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_left> make_shift_left;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_right> make_shift_right;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::multiplies> make_multiplies;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::divides> make_divides;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::modulus> make_modulus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::plus> make_plus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::minus> make_minus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::less> make_less;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::greater> make_greater;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::less_equal> make_less_equal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::greater_equal> make_greater_equal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::equal_to> make_equal_to;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::not_equal_to> make_not_equal_to;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_or> make_logical_or;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_and> make_logical_and;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_and> make_bitwise_and;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_or> make_bitwise_or;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_xor> make_bitwise_xor;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::comma> make_comma;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::mem_ptr> make_mem_ptr;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::assign> make_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_left_assign> make_shift_left_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_right_assign> make_shift_right_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::multiplies_assign> make_multiplies_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::divides_assign> make_divides_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::modulus_assign> make_modulus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::plus_assign> make_plus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::minus_assign> make_minus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_and_assign> make_bitwise_and_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_or_assign> make_bitwise_or_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_xor_assign> make_bitwise_xor_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::subscript> make_subscript;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::if_else_> make_if_else;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::function> make_function;
|
||||
|
||||
struct flatten;
|
||||
struct make_pair;
|
||||
struct first;
|
||||
struct second;
|
||||
struct at;
|
||||
struct pop_front;
|
||||
struct push_front;
|
||||
struct pop_back;
|
||||
struct push_back;
|
||||
struct reverse;
|
||||
} // namespace functional
|
||||
|
||||
typedef functional::flatten _flatten;
|
||||
typedef functional::make_pair _make_pair;
|
||||
typedef functional::first _first;
|
||||
typedef functional::second _second;
|
||||
typedef functional::pop_front _at;
|
||||
typedef functional::pop_front _pop_front;
|
||||
typedef functional::push_front _push_front;
|
||||
typedef functional::pop_back _pop_back;
|
||||
typedef functional::push_back _push_back;
|
||||
typedef functional::reverse _reverse;
|
||||
typedef functional::eval _eval;
|
||||
struct _deep_copy;
|
||||
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::terminal> _make_terminal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::unary_plus> _make_unary_plus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::negate> _make_negate;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::dereference> _make_dereference;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::complement> _make_complement;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::address_of> _make_address_of;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_not> _make_logical_not;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::pre_inc> _make_pre_inc;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::pre_dec> _make_pre_dec;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::post_inc> _make_post_inc;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::post_dec> _make_post_dec;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_left> _make_shift_left;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_right> _make_shift_right;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::multiplies> _make_multiplies;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::divides> _make_divides;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::modulus> _make_modulus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::plus> _make_plus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::minus> _make_minus;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::less> _make_less;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::greater> _make_greater;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::less_equal> _make_less_equal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::greater_equal> _make_greater_equal;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::equal_to> _make_equal_to;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::not_equal_to> _make_not_equal_to;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_or> _make_logical_or;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::logical_and> _make_logical_and;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_and> _make_bitwise_and;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_or> _make_bitwise_or;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_xor> _make_bitwise_xor;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::comma> _make_comma;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::mem_ptr> _make_mem_ptr;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::assign> _make_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_left_assign> _make_shift_left_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::shift_right_assign> _make_shift_right_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::multiplies_assign> _make_multiplies_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::divides_assign> _make_divides_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::modulus_assign> _make_modulus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::plus_assign> _make_plus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::minus_assign> _make_minus_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_and_assign> _make_bitwise_and_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_or_assign> _make_bitwise_or_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::bitwise_xor_assign> _make_bitwise_xor_assign;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::subscript> _make_subscript;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::if_else_> _make_if_else;
|
||||
typedef sprout::breed::functional::make_expr<sprout::breed::tag::function> _make_function;
|
||||
|
||||
template<typename T>
|
||||
struct is_callable;
|
||||
|
||||
template<typename T>
|
||||
struct is_transform;
|
||||
|
||||
template<typename T>
|
||||
struct is_aggregate;
|
||||
|
||||
# define SPROUT_BREED_UNEXPR() typedef int breed_is_expr_;
|
||||
# define SPROUT_BREED_CALLABLE() typedef void breed_is_callable_;
|
||||
# define SPROUT_BREED_AGGREGATE() typedef void breed_is_aggregate_;
|
||||
# define SPROUT_BREED_USE_BASIC_EXPR() typedef void breed_use_basic_expr_;
|
||||
|
||||
struct callable {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE();
|
||||
};
|
||||
|
||||
struct external_transform;
|
||||
|
||||
template<typename PrimitiveTransform = void, typename X = void>
|
||||
struct transform;
|
||||
|
||||
template<typename Grammar, typename Fun = Grammar>
|
||||
struct when;
|
||||
|
||||
template<typename Fun>
|
||||
struct otherwise;
|
||||
|
||||
template<typename Fun>
|
||||
struct call;
|
||||
|
||||
template<typename Fun>
|
||||
struct make;
|
||||
|
||||
template<typename PrimitiveTransform>
|
||||
struct protect;
|
||||
|
||||
template<typename T>
|
||||
struct noinvoke;
|
||||
|
||||
template<typename Fun>
|
||||
struct lazy;
|
||||
|
||||
template<typename Sequence, typename State, typename Fun>
|
||||
struct fold;
|
||||
|
||||
template<typename Sequence, typename State, typename Fun>
|
||||
struct reverse_fold;
|
||||
|
||||
template<typename Sequence, typename State, typename Fun>
|
||||
struct fold_tree;
|
||||
|
||||
template<typename Sequence, typename State, typename Fun>
|
||||
struct reverse_fold_tree;
|
||||
|
||||
template<typename Grammar>
|
||||
struct pass_through;
|
||||
|
||||
template<typename Grammar = sprout::breed::detail::_default>
|
||||
struct _default;
|
||||
|
||||
struct _expr;
|
||||
struct _state;
|
||||
struct _data;
|
||||
|
||||
struct _value;
|
||||
|
||||
struct _void;
|
||||
|
||||
template<typename T, T I>
|
||||
struct integral_c;
|
||||
|
||||
template<char I>
|
||||
struct char_;
|
||||
|
||||
template<int I>
|
||||
struct int_;
|
||||
|
||||
template<long I>
|
||||
struct long_;
|
||||
|
||||
template<std::size_t I>
|
||||
struct size_t;
|
||||
|
||||
template<int I>
|
||||
struct _child_c;
|
||||
|
||||
typedef _child_c<0> _child0;
|
||||
typedef _child_c<1> _child1;
|
||||
typedef _child0 _child;
|
||||
typedef _child0 _left;
|
||||
typedef _child1 _right;
|
||||
|
||||
typedef _child_c<2> _child2;
|
||||
|
||||
struct _byref;
|
||||
struct _byval;
|
||||
|
||||
template<typename T>
|
||||
struct is_extension;
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_BREED_FWD_HPP
|
|
@ -1,19 +0,0 @@
|
|||
#ifndef SPROUT_BREED_CORE_HPP
|
||||
#define SPROUT_BREED_CORE_HPP
|
||||
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
#include <sprout/breed/tags.hpp>
|
||||
#include <sprout/breed/eval.hpp>
|
||||
#include <sprout/breed/expr.hpp>
|
||||
#include <sprout/breed/traits.hpp>
|
||||
#include <sprout/breed/domain.hpp>
|
||||
#include <sprout/breed/matches.hpp>
|
||||
//#include <sprout/breed/extends.hpp>
|
||||
//#include <sprout/breed/literal.hpp>
|
||||
#include <sprout/breed/generate.hpp>
|
||||
//#include <sprout/breed/operators.hpp>
|
||||
//#include <sprout/breed/deep_copy.hpp>
|
||||
//#include <sprout/breed/make_expr.hpp>
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_CORE_HPP
|
|
@ -1,148 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_AS_EXPR_HPP
|
||||
#define SPROUT_BREED_DETAIL_AS_EXPR_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename Generator>
|
||||
struct base_generator {
|
||||
public:
|
||||
typedef Generator type;
|
||||
};
|
||||
template<typename Generator>
|
||||
struct base_generator<sprout::breed::use_basic_expr<Generator> > {
|
||||
public:
|
||||
typedef Generator type;
|
||||
};
|
||||
|
||||
template<typename T, typename Generator, bool WantsBasicExpr>
|
||||
struct as_expr;
|
||||
template<typename T, typename Generator>
|
||||
struct as_expr<T, Generator, false> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::term_traits<T const&>::value_type value_type;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<value_type>,
|
||||
0
|
||||
> expr_type;
|
||||
typedef typename Generator::template result<Generator(expr_type)>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return Generator()(expr_type::make(t));
|
||||
}
|
||||
};
|
||||
template<typename T, typename Generator>
|
||||
struct as_expr<T, Generator, true> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::term_traits<T const&>::value_type value_type;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<value_type>,
|
||||
0
|
||||
> expr_type;
|
||||
typedef typename Generator::template result<Generator(expr_type)>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return Generator()(expr_type::make(t));
|
||||
}
|
||||
};
|
||||
template<typename T>
|
||||
struct as_expr<T, sprout::breed::default_generator, false> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::term_traits<T const&>::value_type value_type;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<value_type>,
|
||||
0
|
||||
> result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return result_type::make(t);
|
||||
}
|
||||
};
|
||||
template<typename T>
|
||||
struct as_expr<T, sprout::breed::default_generator, true> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::term_traits<T const&>::value_type value_type;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<value_type>,
|
||||
0
|
||||
> result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return result_type::make(t);
|
||||
}
|
||||
};
|
||||
|
||||
template<typename T, typename Generator, bool WantsBasicExpr>
|
||||
struct as_child;
|
||||
template<typename T, typename Generator>
|
||||
struct as_child<T, Generator, false> {
|
||||
public:
|
||||
typedef T const& reference;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<reference>,
|
||||
0
|
||||
> expr_type;
|
||||
typedef typename Generator::template result<Generator(expr_type)>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return Generator()(expr_type::make(t));
|
||||
}
|
||||
};
|
||||
template<typename T, typename Generator>
|
||||
struct as_child<T, Generator, true> {
|
||||
public:
|
||||
typedef T const& reference;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<reference>,
|
||||
0
|
||||
> expr_type;
|
||||
typedef typename Generator::template result<Generator(expr_type)>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return Generator()(expr_type::make(t));
|
||||
}
|
||||
};
|
||||
template<typename T>
|
||||
struct as_child<T, sprout::breed::default_generator, false> {
|
||||
public:
|
||||
typedef T const& reference;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<reference>,
|
||||
0
|
||||
> result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return result_type::make(t);
|
||||
}
|
||||
};
|
||||
template<typename T>
|
||||
struct as_child<T, sprout::breed::default_generator, true> {
|
||||
public:
|
||||
typedef T const& reference;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::terminal,
|
||||
sprout::breed::term<reference>,
|
||||
0
|
||||
> result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& t) const {
|
||||
return result_type::make(t);
|
||||
}
|
||||
};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_AS_EXPR_HPP
|
|
@ -1,22 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_AS_LVALUE_HPP
|
||||
#define SPROUT_BREED_DETAIL_AS_LVALUE_HPP
|
||||
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename T>
|
||||
inline SPROUT_CONSTEXPR T& as_lvalue(T& t) {
|
||||
return t;
|
||||
}
|
||||
template<typename T>
|
||||
inline SPROUT_CONSTEXPR T const& as_lvalue(T const& t) {
|
||||
return t;
|
||||
}
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_AS_LVALUE_HPP
|
|
@ -1,226 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_DEDUCE_DOMAIN_HPP
|
||||
#define SPROUT_BREED_DETAIL_DEDUCE_DOMAIN_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/index_tuple/metafunction.hpp>
|
||||
#include <sprout/utility/pack.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
//
|
||||
// SPROUT_BREED_ASSERT_VALID_DOMAIN
|
||||
//
|
||||
#ifndef SPROUT_BREED_ASSERT_VALID_DOMAIN
|
||||
# define SPROUT_BREED_ASSERT_VALID_DOMAIN(DOM) static_assert( \
|
||||
!std::is_same<DOM, sprout::breed::detail::not_a_domain>::value, \
|
||||
"!std::is_same<DOM, sprout::breed::detail::not_a_domain>::value" \
|
||||
)
|
||||
#endif
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename Domain>
|
||||
struct domain_
|
||||
: public domain_<typename Domain::breed_super_domain>
|
||||
{
|
||||
public:
|
||||
typedef Domain type;
|
||||
typedef domain_<typename Domain::breed_super_domain> base;
|
||||
public:
|
||||
using base::deduce_;
|
||||
static SPROUT_CONSTEXPR type deduce_(domain_<Domain> const*);
|
||||
};
|
||||
template<>
|
||||
struct domain_<sprout::breed::detail::not_a_domain> {
|
||||
public:
|
||||
typedef sprout::breed::detail::not_a_domain type;
|
||||
public:
|
||||
static type deduce_(void const*);
|
||||
};
|
||||
|
||||
template<>
|
||||
struct domain_<sprout::breed::default_domain>
|
||||
: public domain_<sprout::breed::detail::not_a_domain>
|
||||
{};
|
||||
|
||||
template<>
|
||||
struct domain_<sprout::breed::basic_default_domain>
|
||||
: public domain_<sprout::breed::detail::not_a_domain>
|
||||
{};
|
||||
|
||||
sprout::breed::detail::sized_type<1>::type default_test(
|
||||
void const*,
|
||||
void const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<2>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*,
|
||||
void const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<2>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*, void const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<3>::type default_test(
|
||||
void const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<3>::type default_test(
|
||||
void const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<4>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<4>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<4>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::default_domain> const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*
|
||||
);
|
||||
sprout::breed::detail::sized_type<4>::type default_test(
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*,
|
||||
sprout::breed::detail::domain_<sprout::breed::basic_default_domain> const*
|
||||
);
|
||||
|
||||
template<typename D0>
|
||||
struct common_domain1 {
|
||||
public:
|
||||
typedef D0 type;
|
||||
};
|
||||
|
||||
template<typename E0>
|
||||
struct deduce_domain1
|
||||
: public sprout::breed::domain_of<E0>
|
||||
{};
|
||||
|
||||
template<
|
||||
typename D0,
|
||||
typename D1,
|
||||
int DefaultCase = sizeof(
|
||||
sprout::breed::detail::default_test(
|
||||
static_cast<sprout::breed::detail::domain_<D0> const*>(0),
|
||||
static_cast<sprout::breed::detail::domain_<D1> const*>(0)
|
||||
)
|
||||
)
|
||||
>
|
||||
struct common_domain2 {
|
||||
public:
|
||||
typedef decltype(sprout::breed::detail::domain_<D0>::deduce_(
|
||||
static_cast<sprout::breed::detail::domain_<D1> const*>(0)
|
||||
)) type;
|
||||
};
|
||||
template<typename D0, typename D1>
|
||||
struct common_domain2<D0, D1, 2> {
|
||||
public:
|
||||
typedef D1 type;
|
||||
};
|
||||
template<typename D0, typename D1>
|
||||
struct common_domain2<D0, D1, 3> {
|
||||
public:
|
||||
typedef D0 type;
|
||||
};
|
||||
template<typename D0>
|
||||
struct common_domain2<D0, sprout::breed::default_domain, 4> {
|
||||
public:
|
||||
typedef D0 type;
|
||||
};
|
||||
template<typename D0>
|
||||
struct common_domain2<D0, sprout::breed::basic_default_domain, 4> {
|
||||
public:
|
||||
typedef D0 type;
|
||||
};
|
||||
template<typename D1>
|
||||
struct common_domain2<sprout::breed::default_domain, D1, 4> {
|
||||
public:
|
||||
typedef D1 type;
|
||||
};
|
||||
template<typename D1>
|
||||
struct common_domain2<sprout::breed::basic_default_domain, D1, 4> {
|
||||
public:
|
||||
typedef D1 type;
|
||||
};
|
||||
template<>
|
||||
struct common_domain2<sprout::breed::default_domain, sprout::breed::default_domain, 4> {
|
||||
public:
|
||||
typedef sprout::breed::default_domain type;
|
||||
};
|
||||
template<>
|
||||
struct common_domain2<sprout::breed::basic_default_domain, sprout::breed::default_domain, 4> {
|
||||
public:
|
||||
typedef sprout::breed::default_domain type;
|
||||
};
|
||||
template<>
|
||||
struct common_domain2<sprout::breed::default_domain, sprout::breed::basic_default_domain, 4> {
|
||||
public:
|
||||
typedef sprout::breed::default_domain type;
|
||||
};
|
||||
template<>
|
||||
struct common_domain2<sprout::breed::basic_default_domain, sprout::breed::basic_default_domain, 4> {
|
||||
public:
|
||||
typedef sprout::breed::basic_default_domain type;
|
||||
};
|
||||
|
||||
template<typename E0, typename E1>
|
||||
struct deduce_domain2
|
||||
: public common_domain2<
|
||||
typename sprout::breed::domain_of<E0>::type,
|
||||
typename sprout::breed::domain_of<E1>::type
|
||||
>
|
||||
{};
|
||||
|
||||
template<typename... Args>
|
||||
struct common_domain {
|
||||
private:
|
||||
template<typename Common, typename Head, typename... Tail>
|
||||
struct common_impl {
|
||||
public:
|
||||
typedef typename common_impl<
|
||||
typename sprout::breed::detail::common_domain2<Common, Head>::type,
|
||||
Tail...
|
||||
>::type type;
|
||||
};
|
||||
template<typename Common, typename Head>
|
||||
struct common_impl<Common, Head> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::common_domain2<Common, Head>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Head, typename... Tail>
|
||||
struct common
|
||||
: public common_impl<Head, Tail...>
|
||||
{};
|
||||
template<typename Head>
|
||||
struct common<Head>
|
||||
: public sprout::breed::detail::common_domain1<Head>
|
||||
{};
|
||||
public:
|
||||
typedef typename common<Args...>::type type;
|
||||
SPROUT_BREED_ASSERT_VALID_DOMAIN(type);
|
||||
};
|
||||
|
||||
template<typename IndexTuple, typename... Args>
|
||||
struct deduce_domain_impl;
|
||||
template<typename... Args, sprout::index_t... Indexes>
|
||||
struct deduce_domain_impl<sprout::index_tuple<Indexes...>, Args...>
|
||||
: public sprout::breed::detail::common_domain<
|
||||
typename sprout::breed::domain_of<
|
||||
typename sprout::tppack_at<Indexes, Args...>::type
|
||||
>::type...
|
||||
>
|
||||
{};
|
||||
|
||||
template<typename... Args>
|
||||
struct deduce_domain
|
||||
: public sprout::breed::detail::deduce_domain_impl<
|
||||
typename sprout::index_pack<Args...>::type,
|
||||
Args...
|
||||
>
|
||||
{};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_DEDUCE_DOMAIN_HPP
|
|
@ -1,207 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_POLY_FUNCTION_HPP
|
||||
#define SPROUT_BREED_DETAIL_POLY_FUNCTION_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename T>
|
||||
struct normalize_arg {
|
||||
public:
|
||||
typedef T type;
|
||||
typedef T const& reference;
|
||||
};
|
||||
template<typename T>
|
||||
struct normalize_arg<T&> {
|
||||
public:
|
||||
typedef T type;
|
||||
typedef T const& reference;
|
||||
};
|
||||
template<typename T>
|
||||
struct normalize_arg<T const&> {
|
||||
public:
|
||||
typedef T type;
|
||||
typedef T const& reference;
|
||||
};
|
||||
|
||||
template<typename T>
|
||||
struct arg {
|
||||
public:
|
||||
typedef T const& type;
|
||||
private:
|
||||
type value;
|
||||
public:
|
||||
SPROUT_CONSTEXPR arg(type t)
|
||||
: value(t)
|
||||
{}
|
||||
SPROUT_CONSTEXPR operator type() const {
|
||||
return this->value;
|
||||
}
|
||||
SPROUT_CONSTEXPR type operator()() const {
|
||||
return *this;
|
||||
}
|
||||
private:
|
||||
arg& operator=(arg const&) SPROUT_DELETED_FUNCTION_DECL
|
||||
};
|
||||
template<typename T>
|
||||
struct arg<T&> {
|
||||
public:
|
||||
typedef T& type;
|
||||
private:
|
||||
type value;
|
||||
public:
|
||||
SPROUT_CONSTEXPR arg(type t)
|
||||
: value(t)
|
||||
{}
|
||||
SPROUT_CONSTEXPR operator type() const {
|
||||
return this->value;
|
||||
}
|
||||
SPROUT_CONSTEXPR type operator()() const {
|
||||
return *this;
|
||||
}
|
||||
private:
|
||||
arg& operator=(arg const&) SPROUT_DELETED_FUNCTION_DECL
|
||||
};
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_poly_function
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_poly_function<T, typename T::is_poly_function_base_>
|
||||
: public std::true_type
|
||||
{};
|
||||
|
||||
# define SPROUT_BREED_POLY_FUNCTION() \
|
||||
typedef void is_poly_function_base_;
|
||||
|
||||
struct poly_function_base {
|
||||
public:
|
||||
SPROUT_BREED_POLY_FUNCTION();
|
||||
};
|
||||
|
||||
template<typename Derived, typename NullaryResult = void>
|
||||
struct poly_function
|
||||
: public psprout::breed::detail::poly_function_base
|
||||
{
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This>
|
||||
struct result<This()>
|
||||
: public Derived::template impl<>
|
||||
{
|
||||
public:
|
||||
typedef typename result::result_type type;
|
||||
};
|
||||
template<typename This, typename... Args>
|
||||
struct result<This(Args...)>
|
||||
: public Derived::template impl<
|
||||
typename normalize_arg<Args>::type...
|
||||
>
|
||||
{
|
||||
public:
|
||||
typedef typename result::result_type type;
|
||||
};
|
||||
public:
|
||||
SPROUT_CONSTEXPR NullaryResult operator()() const {
|
||||
return result<Derived const()>().operator()();
|
||||
}
|
||||
template<typename... Args>
|
||||
SPROUT_CONSTEXPR typename result<Derived const(Args const&...)>::type
|
||||
operator()(Args const&... args) const {
|
||||
return result<Derived const(Args const&...)>().operator()(
|
||||
static_cast<typename normalize_arg<Args const&>::reference>(args)...
|
||||
);
|
||||
}
|
||||
};
|
||||
|
||||
template<typename T>
|
||||
struct wrap_t;
|
||||
|
||||
typedef char poly_function_t;
|
||||
typedef char (&mono_function_t)[2];
|
||||
typedef char (&unknown_function_t)[3];
|
||||
|
||||
template<typename T> sprout::breed::detail::poly_function_t test_poly_function(
|
||||
T const*,
|
||||
sprout::breed::detail::wrap_t<typename T::is_poly_function_base_> const* = 0
|
||||
);
|
||||
template<typename T> sprout::breed::detail::mono_function_t test_poly_function(
|
||||
T const*,
|
||||
sprout::breed::detail::wrap_t<typename T::result_type> const* = 0
|
||||
);
|
||||
template<typename T> sprout::breed::detail::unknown_function_t test_poly_function(
|
||||
T const*,
|
||||
...
|
||||
);
|
||||
|
||||
template<
|
||||
typename Fun,
|
||||
typename Sig,
|
||||
typename Switch = std::integral_constant<
|
||||
std::size_t,
|
||||
sizeof(sprout::breed::detail::test_poly_function<Fun>(0, 0))
|
||||
>
|
||||
>
|
||||
struct poly_function_traits {
|
||||
public:
|
||||
typedef typename Fun::template result<Sig>::type result_type;
|
||||
typedef Fun function_type;
|
||||
};
|
||||
template<typename Fun, typename Sig>
|
||||
struct poly_function_traits<
|
||||
Fun,
|
||||
Sig,
|
||||
std::integral_constant<
|
||||
std::size_t,
|
||||
sizeof(sprout::breed::detail::mono_function_t)
|
||||
>
|
||||
> {
|
||||
public:
|
||||
typedef typename Fun::result_type result_type;
|
||||
typedef Fun function_type;
|
||||
};
|
||||
template<typename PolyFun, typename... Args>
|
||||
struct poly_function_traits<
|
||||
PolyFun,
|
||||
PolyFun(
|
||||
Args...,
|
||||
std::integral_constant<std::size_t, sizeof(sprout::breed::detail::poly_function_t)
|
||||
)
|
||||
> {
|
||||
public:
|
||||
typedef typename PolyFun::template impl<Args...> function_type;
|
||||
typedef typename function_type::result_type result_type;
|
||||
};
|
||||
|
||||
template<typename PolyFunSig, bool IsPolyFunction>
|
||||
struct as_mono_function_impl;
|
||||
template<typename PolyFun, typename... Args>
|
||||
struct as_mono_function_impl<PolyFun(Args...), true> {
|
||||
public:
|
||||
typedef typename PolyFun::template impl<Args const...> type;
|
||||
};
|
||||
template<typename PolyFun, typename... Args>
|
||||
struct as_mono_function_impl<PolyFun(Args...), false> {
|
||||
public:
|
||||
typedef PolyFun type;
|
||||
};
|
||||
|
||||
template<typename PolyFunSig>
|
||||
struct as_mono_function;
|
||||
template<typename PolyFun, typename... Args>
|
||||
struct as_mono_function<PolyFun(Args...)>
|
||||
: public sprout::breed::detail::as_mono_function_impl<
|
||||
PolyFun(Args...),
|
||||
sprout::breed::detail::is_poly_function<PolyFun>::value
|
||||
>
|
||||
{};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_POLY_FUNCTION_HPP
|
|
@ -1,18 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_STD_RESULT_OF_HPP
|
||||
#define SPROUT_BREED_DETAIL_STD_RESULT_OF_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename F>
|
||||
struct std_result_of
|
||||
: public std::result_of<F>
|
||||
{};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_STD_RESULT_OF_HPP
|
|
@ -1,25 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DETAIL_TEMPLATE_ARITY_HPP
|
||||
#define SPROUT_BREED_DETAIL_TEMPLATE_ARITY_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename F>
|
||||
struct template_arity_impl;
|
||||
template<template<typename...> class F, typename... Args>
|
||||
struct template_arity_impl<F<Args...> >
|
||||
: public std::integral_constant<int, sizeof...(Args)>
|
||||
{};
|
||||
|
||||
template<typename F>
|
||||
struct template_arity
|
||||
: public sprout::breed::detail::template_arity_impl<F>
|
||||
{};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DETAIL_TEMPLATE_ARITY_HPP
|
|
@ -1,183 +0,0 @@
|
|||
#ifndef SPROUT_BREED_DOMAIN_HPP
|
||||
#define SPROUT_BREED_DOMAIN_HPP
|
||||
|
||||
#include <functional>
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/generate.hpp>
|
||||
#include <sprout/breed/detail/as_expr.hpp>
|
||||
#include <sprout/breed/detail/deduce_domain.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
struct not_a_generator {};
|
||||
struct not_a_grammar {};
|
||||
struct not_a_domain {};
|
||||
} // namespace detail
|
||||
|
||||
namespace domainns_ {
|
||||
//
|
||||
// domain
|
||||
//
|
||||
template<
|
||||
typename Generator,
|
||||
typename Grammar,
|
||||
typename Super
|
||||
>
|
||||
struct domain
|
||||
: public Generator
|
||||
{
|
||||
public:
|
||||
typedef Generator breed_generator;
|
||||
typedef Grammar breed_grammar;
|
||||
typedef Super breed_super_domain;
|
||||
typedef domain breed_base_domain;
|
||||
typedef void breed_is_domain_;
|
||||
public:
|
||||
template<typename T, typename IsExpr = void, typename Callable = sprout::breed::callable>
|
||||
struct as_expr
|
||||
: public detail::as_expr<
|
||||
T,
|
||||
typename sprout::breed::detail::base_generator<Generator>::type,
|
||||
sprout::breed::wants_basic_expr<Generator>::value
|
||||
>
|
||||
{
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
};
|
||||
template<typename T>
|
||||
struct as_expr<T, typename T::breed_is_expr_, sprout::breed::callable> {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
typedef typename std::remove_const<T>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& e) const {
|
||||
return e;
|
||||
}
|
||||
};
|
||||
template<typename T, typename IsExpr = void, typename Callable = sprout::breed::callable>
|
||||
struct as_child
|
||||
: public detail::as_child<
|
||||
T,
|
||||
typename sprout::breed::detail::base_generator<Generator>::type,
|
||||
sprout::breed::wants_basic_expr<Generator>::value
|
||||
>
|
||||
{
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
};
|
||||
template<typename T>
|
||||
struct as_child<T, typename T::breed_is_expr_, sprout::breed::callable> {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
typedef T &result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(T const& e) const {
|
||||
return e;
|
||||
}
|
||||
};
|
||||
};
|
||||
|
||||
//
|
||||
// default_domain
|
||||
//
|
||||
struct default_domain
|
||||
: public sprout::breed::domain<>
|
||||
{};
|
||||
|
||||
//
|
||||
// basic_default_domain
|
||||
//
|
||||
struct basic_default_domain
|
||||
: public sprout::breed::domain<sprout::breed::basic_default_generator>
|
||||
{};
|
||||
|
||||
//
|
||||
// deduce_domain
|
||||
//
|
||||
struct deduce_domain
|
||||
: public sprout::breed::domain<
|
||||
sprout::breed::detail::not_a_generator,
|
||||
sprout::breed::detail::not_a_grammar,
|
||||
sprout::breed::detail::not_a_domain
|
||||
>
|
||||
{};
|
||||
|
||||
//
|
||||
// base_expr
|
||||
//
|
||||
template<typename Domain, typename Tag, typename Args, bool WantsBasicExpr>
|
||||
struct base_expr {
|
||||
public:
|
||||
typedef sprout::breed::expr<Tag, Args, Args::arity> type;
|
||||
};
|
||||
template<typename Domain, typename Tag, typename Args>
|
||||
struct base_expr<Domain, Tag, Args, true> {
|
||||
public:
|
||||
typedef sprout::breed::basic_expr<Tag, Args, Args::arity> type;
|
||||
};
|
||||
} // namespace domainns_
|
||||
|
||||
//
|
||||
// is_domain
|
||||
//
|
||||
template<typename T, typename Void>
|
||||
struct is_domain
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_domain<T, typename T::breed_is_domain_>
|
||||
: public std::true_type
|
||||
{};
|
||||
|
||||
//
|
||||
// domain_of
|
||||
//
|
||||
template<typename T, typename Void>
|
||||
struct domain_of {
|
||||
public:
|
||||
typedef sprout::breed::default_domain type;
|
||||
};
|
||||
template<typename T>
|
||||
struct domain_of<T, typename T::breed_is_expr_> {
|
||||
public:
|
||||
typedef typename T::breed_domain type;
|
||||
};
|
||||
template<typename T>
|
||||
struct domain_of<T&, void> {
|
||||
public:
|
||||
typedef typename sprout::breed::domain_of<T>::type type;
|
||||
};
|
||||
template<typename T>
|
||||
struct domain_of<std::reference_wrapper<T>, void> {
|
||||
public:
|
||||
typedef typename sprout::breed::domain_of<T>::type type;
|
||||
};
|
||||
template<typename T>
|
||||
struct domain_of<std::reference_wrapper<T> const, void> {
|
||||
typedef typename sprout::breed::domain_of<T>::type type;
|
||||
};
|
||||
|
||||
//
|
||||
// is_sub_domain_of
|
||||
//
|
||||
template<typename SubDomain, typename SuperDomain>
|
||||
struct is_sub_domain_of
|
||||
: public is_sub_domain_of<typename SubDomain::breed_super_domain, SuperDomain>
|
||||
{};
|
||||
template<typename SuperDomain>
|
||||
struct is_sub_domain_of<sprout::breed::no_super_domain, SuperDomain>
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename SuperDomain>
|
||||
struct is_sub_domain_of<SuperDomain, SuperDomain>
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_DOMAIN_HPP
|
|
@ -1,87 +0,0 @@
|
|||
#ifndef SPROUT_BREED_EVAL_HPP
|
||||
#define SPROUT_BREED_EVAL_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace result_of {
|
||||
//
|
||||
// eval
|
||||
//
|
||||
template<typename Expr, typename Context>
|
||||
struct eval {
|
||||
public:
|
||||
typedef typename Context::template eval<Expr>::result_type type;
|
||||
};
|
||||
} // namespace result_of
|
||||
|
||||
namespace functional {
|
||||
//
|
||||
// eval
|
||||
//
|
||||
struct eval {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE();
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr, typename Context>
|
||||
struct result<This(Expr, Context)> {
|
||||
typedef typename sprout::breed::result_of::eval<
|
||||
typename std::remove_reference<Expr>::type,
|
||||
typename std::remove_reference<Context>::type
|
||||
>::type type;
|
||||
};
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr, Context>::type
|
||||
operator()(Expr& e, Context& ctx) const {
|
||||
return typename Context::template eval<Expr>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr, Context>::type
|
||||
operator()(Expr& e, Context const& ctx) const {
|
||||
return typename Context::template eval<Expr>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr const, Context>::type
|
||||
operator()(Expr const& e, Context& ctx) const {
|
||||
return typename Context::template eval<Expr const>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::eval<Expr const, Context>::type
|
||||
operator()(Expr const& e, Context const& ctx) const {
|
||||
return typename Context::template eval<Expr const>()(e, ctx);
|
||||
}
|
||||
};
|
||||
} // namespace functional
|
||||
|
||||
//
|
||||
// eval
|
||||
//
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr, Context>::type
|
||||
eval(Expr& e, Context& ctx) {
|
||||
return typename Context::template eval<Expr>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr, Context>::type
|
||||
eval(Expr& e, Context const& ctx) {
|
||||
return typename Context::template eval<Expr>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
typename sprout::breed::result_of::eval<Expr const, Context>::type
|
||||
eval(Expr const& e, Context& ctx) {
|
||||
return typename Context::template eval<Expr const>()(e, ctx);
|
||||
}
|
||||
template<typename Expr, typename Context>
|
||||
SPROUT_CONSTEXPRtypename sprout::breed::result_of::eval<Expr const, Context>::type
|
||||
eval(Expr const& e, Context const& ctx) {
|
||||
return typename Context::template eval<Expr const>()(e, ctx);
|
||||
}
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_EVAL_HPP
|
|
@ -1,478 +0,0 @@
|
|||
#ifndef SPROUT_BREED_EXPR_HPP
|
||||
#define SPROUT_BREED_EXPR_HPP
|
||||
|
||||
#include <cstddef>
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/utility/pack.hpp>
|
||||
#include <sprout/tuple/tuple.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
#include <sprout/breed/traits.hpp>
|
||||
#include <sprout/assert.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
struct not_a_valid_type {
|
||||
private:
|
||||
SPROUT_CONSTEXPR not_a_valid_type() {}
|
||||
};
|
||||
|
||||
template<typename Tag, typename Arg>
|
||||
struct address_of_hack {
|
||||
public:
|
||||
typedef sprout::breed::detail::not_a_valid_type type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct address_of_hack<sprout::breed::tag::address_of, Expr&> {
|
||||
typedef Expr* type;
|
||||
};
|
||||
|
||||
template<typename T, typename Expr, typename Arg>
|
||||
SPROUT_CONSTEXPR Expr make_terminal(T const& t, Expr*, sprout::breed::term<Arg> const*) {
|
||||
return Expr(t);
|
||||
}
|
||||
template<typename T, typename Expr, typename Arg, std::size_t N>
|
||||
SPROUT_CONSTEXPR Expr make_terminal(T const (&t)[N], Expr const*, sprout::breed::term<Arg[N]> const*) {
|
||||
return SPROUT_ASSERT_MSG(0, "Sorry, not implemented."), Expr();
|
||||
}
|
||||
|
||||
template<typename T, typename U>
|
||||
struct same_cv {
|
||||
public:
|
||||
typedef U type;
|
||||
};
|
||||
template<typename T, typename U>
|
||||
struct same_cv<T const, U> {
|
||||
public:
|
||||
typedef U const type;
|
||||
};
|
||||
} // namespace detail
|
||||
|
||||
namespace result_of {
|
||||
namespace detail {
|
||||
template<typename Expr, typename Domain, typename... Args>
|
||||
struct funop_impl {
|
||||
public:
|
||||
typedef typename sprout::breed::base_expr<
|
||||
Domain,
|
||||
sprout::breed::tag::function,
|
||||
sprout::breed::list<
|
||||
Expr const&,
|
||||
typename sprout::breed::result_of::as_child<Args, Domain>::type...
|
||||
>
|
||||
>::type type;
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type const call(
|
||||
Expr const& e,
|
||||
Args const&... args
|
||||
) const
|
||||
{
|
||||
return type(
|
||||
e,
|
||||
sprout::breed::as_child<Domain>(args)...
|
||||
);
|
||||
}
|
||||
};
|
||||
} // namespace detail
|
||||
//
|
||||
// funop
|
||||
//
|
||||
template<typename Sig, typename This, typename Domain>
|
||||
struct funop;
|
||||
template<typename Expr, typename... Args, typename This, typename Domain>
|
||||
struct funop<Expr(Args...), This, Domain>
|
||||
: public sprout::breed::result_of::detail::funop_impl<
|
||||
typename sprout::breed::detail::same_cv<Expr, This>::type,
|
||||
Domain,
|
||||
typename std::remove_reference<Args>::type...
|
||||
>
|
||||
{};
|
||||
} // namespace result_of
|
||||
|
||||
namespace exprns_ {
|
||||
//
|
||||
// basic_expr
|
||||
//
|
||||
template<typename Tag, typename Arg>
|
||||
struct basic_expr<Tag, term<Arg>, 0> {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long breed_arity_c = 0;
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef std::integral_constant<long, breed_arity_c> breed_arity;
|
||||
typedef basic_expr breed_base_expr;
|
||||
typedef sprout::breed::term<Arg> breed_args;
|
||||
typedef basic_expr breed_grammar;
|
||||
typedef sprout::breed::basic_default_domain breed_domain;
|
||||
typedef sprout::breed::default_generator breed_generator;
|
||||
typedef sprout::breed::tag::breed_expr fusion_tag;
|
||||
typedef basic_expr breed_derived_expr;
|
||||
typedef void breed_is_expr_;
|
||||
typedef sprout::breed::detail::not_a_valid_type address_of_hack_type_;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, Arg>
|
||||
{};
|
||||
public:
|
||||
template<typename A>
|
||||
static SPROUT_CONSTEXPR basic_expr make(A const& arg) {
|
||||
return sprout::breed::detail::make_terminal(
|
||||
arg,
|
||||
static_cast<basic_expr const*>(0),
|
||||
static_cast<breed_args const*>(0)
|
||||
);
|
||||
}
|
||||
private:
|
||||
sprout::tuples::tuple<Arg> children_;
|
||||
public:
|
||||
explicit SPROUT_CONSTEXPR basic_expr(Arg const& arg)
|
||||
: children_(arg)
|
||||
{}
|
||||
template<long N>
|
||||
SPROUT_CONSTEXPR typename breed_child<N>::type const& child() const {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
template<long N>
|
||||
typename breed_child<N>::type const& child() {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
SPROUT_CONSTEXPR basic_expr const& breed_base() const {
|
||||
return *this;
|
||||
}
|
||||
basic_expr& breed_base() {
|
||||
return *this;
|
||||
}
|
||||
};
|
||||
template<typename Tag, typename... Args>
|
||||
struct basic_expr<Tag, sprout::breed::list<Args...>, sizeof...(Args)> {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long breed_arity_c = sizeof...(Args);
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef std::integral_constant<long, breed_arity_c> breed_arity;
|
||||
typedef basic_expr breed_base_expr;
|
||||
typedef sprout::breed::list<Args...> breed_args;
|
||||
typedef basic_expr breed_grammar;
|
||||
typedef sprout::breed::basic_default_domain breed_domain;
|
||||
typedef sprout::breed::default_generator breed_generator;
|
||||
typedef sprout::breed::tag::breed_expr fusion_tag;
|
||||
typedef basic_expr breed_derived_expr;
|
||||
typedef void breed_is_expr_;
|
||||
typedef sprout::breed::detail::not_a_valid_type address_of_hack_type_;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, Args...>
|
||||
{};
|
||||
public:
|
||||
template<typename... As>
|
||||
static SPROUT_CONSTEXPR basic_expr make(As const&... args) {
|
||||
return basic_expr(args...);
|
||||
}
|
||||
private:
|
||||
sprout::tuples::tuple<Args...> children_;
|
||||
public:
|
||||
explicit SPROUT_CONSTEXPR basic_expr(Args const&... args)
|
||||
: children_(args...)
|
||||
{}
|
||||
template<long N>
|
||||
SPROUT_CONSTEXPR typename breed_child<N>::type const& child() const {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
template<long N>
|
||||
typename breed_child<N>::type const& child() {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
SPROUT_CONSTEXPR basic_expr const& breed_base() const {
|
||||
return *this;
|
||||
}
|
||||
basic_expr& breed_base() {
|
||||
return *this;
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// expr
|
||||
//
|
||||
template<typename Tag, typename Arg>
|
||||
struct expr<Tag, sprout::breed::term<Arg>, 0> {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long breed_arity_c = 0;
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef std::integral_constant<long, breed_arity_c> breed_arity;
|
||||
typedef expr breed_base_expr;
|
||||
typedef sprout::breed::term<Arg> breed_args;
|
||||
typedef basic_expr<Tag, breed_args, 0> breed_grammar;
|
||||
typedef sprout::breed::basic_default_domain breed_domain;
|
||||
typedef sprout::breed::default_generator breed_generator;
|
||||
typedef sprout::breed::tag::breed_expr fusion_tag;
|
||||
typedef expr breed_derived_expr;
|
||||
typedef void proto_is_expr_;
|
||||
typedef sprout::breed::detail::not_a_valid_type address_of_hack_type_;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, Arg>
|
||||
{};
|
||||
template<typename Sig>
|
||||
struct result {
|
||||
public:
|
||||
typedef typename sprout::breed::result_of::funop<
|
||||
Sig,
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename A>
|
||||
static SPROUT_CONSTEXPR expr make(A const& arg) {
|
||||
return sprout::breed::detail::make_terminal(
|
||||
arg,
|
||||
static_cast<expr const*>(0),
|
||||
static_cast<breed_args const*>(0)
|
||||
);
|
||||
}
|
||||
private:
|
||||
sprout::tuples::tuple<Arg> children_;
|
||||
public:
|
||||
explicit SPROUT_CONSTEXPR expr(Arg const& arg)
|
||||
: children_(arg)
|
||||
{}
|
||||
template<long N>
|
||||
SPROUT_CONSTEXPR typename breed_child<N>::type const& child() const {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
template<long N>
|
||||
typename breed_child<N>::type const& child() {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
SPROUT_CONSTEXPR expr const& breed_base() const {
|
||||
return *this;
|
||||
}
|
||||
expr& breed_base() {
|
||||
return *this;
|
||||
}
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, expr const&>,
|
||||
2
|
||||
> operator=(expr const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, expr const&>,
|
||||
2
|
||||
>(*this, arg);
|
||||
}
|
||||
template<typename A>
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
> operator=(A const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
> operator=(A& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
> operator[](A const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
> operator[](A& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename... As>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::funop<
|
||||
expr(As const&...),
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::type operator()(As const&... args) const {
|
||||
return sprout::breed::result_of::funop<
|
||||
expr(As const&...),
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::call(*this, args...);
|
||||
}
|
||||
};
|
||||
template<typename Tag, typename... Args>
|
||||
struct expr<Tag, sprout::breed::list<Args...>, sizeof...(Args)> {
|
||||
public:
|
||||
SPROUT_STATIC_CONSTEXPR long breed_arity_c = sizeof...(Args);
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef std::integral_constant<long, breed_arity_c> breed_arity;
|
||||
typedef expr breed_base_expr;
|
||||
typedef sprout::breed::list<Args...> breed_args;
|
||||
typedef basic_expr<Tag, breed_args, 0> breed_grammar;
|
||||
typedef sprout::breed::basic_default_domain breed_domain;
|
||||
typedef sprout::breed::default_generator breed_generator;
|
||||
typedef sprout::breed::tag::breed_expr fusion_tag;
|
||||
typedef expr breed_derived_expr;
|
||||
typedef void proto_is_expr_;
|
||||
typedef sprout::breed::detail::not_a_valid_type address_of_hack_type_;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, Args...>
|
||||
{};
|
||||
template<typename Sig>
|
||||
struct result {
|
||||
public:
|
||||
typedef typename sprout::breed::result_of::funop<
|
||||
Sig,
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename... As>
|
||||
static SPROUT_CONSTEXPR basic_expr make(As const&... args) {
|
||||
return basic_expr(args...);
|
||||
}
|
||||
private:
|
||||
sprout::tuples::tuple<Arg> children_;
|
||||
public:
|
||||
explicit SPROUT_CONSTEXPR basic_expr(Args const&... args)
|
||||
: children_(args...)
|
||||
{}
|
||||
template<long N>
|
||||
SPROUT_CONSTEXPR typename breed_child<N>::type const& child() const {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
template<long N>
|
||||
typename breed_child<N>::type const& child() {
|
||||
return sprout::tuples::get<N>(children_);
|
||||
}
|
||||
SPROUT_CONSTEXPR basic_expr const& breed_base() const {
|
||||
return *this;
|
||||
}
|
||||
basic_expr& breed_base() {
|
||||
return *this;
|
||||
}
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, expr const&>,
|
||||
2
|
||||
> operator=(expr const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, expr const&>,
|
||||
2
|
||||
>(*this, arg);
|
||||
}
|
||||
template<typename A>
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
> operator=(A const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
> operator=(A& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::assign,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
SPROUT_CONSTEXPR sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
> operator[](A const& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A const>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename A>
|
||||
sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
> operator[](A& arg) const {
|
||||
return sprout::breed::expr<
|
||||
sprout::breed::tag::subscript,
|
||||
sprout::breed::list<expr const&, typename sprout::breed::result_of::as_child<A>::type>,
|
||||
2
|
||||
>(*this, sprout::breed::as_child(arg));
|
||||
}
|
||||
template<typename... As>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::funop<
|
||||
expr(As const&...),
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::type operator()(As const&... args) const {
|
||||
return sprout::breed::result_of::funop<
|
||||
expr(As const&...),
|
||||
expr,
|
||||
sprout::breed::default_domain
|
||||
>::call(*this, args...);
|
||||
}
|
||||
};
|
||||
} // namespace exprns_
|
||||
|
||||
//
|
||||
// unexpr
|
||||
//
|
||||
template<typename Expr>
|
||||
struct unexpr
|
||||
: public Expr
|
||||
{
|
||||
public:
|
||||
SPROUT_BREED_UNEXPR();
|
||||
public:
|
||||
explicit SPROUT_CONSTEXPR unexpr(Expr const& e)
|
||||
: Expr(e)
|
||||
{}
|
||||
using Expr::operator=;
|
||||
};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_EXPR_HPP
|
|
@ -1,322 +0,0 @@
|
|||
#ifndef SPROUT_BREED_GENERATE_HPP
|
||||
#define SPROUT_BREED_GENERATE_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/index_tuple/metafunction.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
#include <sprout/breed/detail/std_result_of.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename Expr>
|
||||
struct by_value_generator_;
|
||||
template<typename Tag, typename Arg>
|
||||
struct by_value_generator_<sprout::breed::expr<Tag, sprout::breed::term<Arg>, 0> > {
|
||||
public:
|
||||
typedef breed::expr<
|
||||
Tag,
|
||||
sprout::breed::term<typename sprout::breed::detail::term_traits<Arg>::value_type>,
|
||||
0
|
||||
> type;
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type call(breed::expr<Tag, term<Arg>, 0> const& e) {
|
||||
return type(e.template child<0>());
|
||||
}
|
||||
};
|
||||
template<typename Tag, typename Arg>
|
||||
struct by_value_generator_<sprout::breed::basic_expr<Tag, sprout::breed::term<Arg>, 0> > {
|
||||
public:
|
||||
typedef breed::expr<
|
||||
Tag,
|
||||
sprout::breed::term<typename sprout::breed::detail::term_traits<Arg>::value_type>,
|
||||
0
|
||||
> type;
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type call(breed::expr<Tag, term<Arg>, 0> const& e) {
|
||||
return type(e.template child<0>());
|
||||
}
|
||||
};
|
||||
template<typename Tag, typename... Args>
|
||||
struct by_value_generator_<
|
||||
sprout::breed::expr<Tag, sprout::breed::list<Args...>, sizeof...(Args)>
|
||||
> {
|
||||
public:
|
||||
typedef sprout::breed::list<Args...> src_args;
|
||||
typedef sprout::breed::list<typename sprout::breed::detail::uncvref<Args>::type...> dst_args;
|
||||
typedef sprout::breed::expr<Tag, src_args, N> src_type;
|
||||
typedef sprout::breed::expr<Tag, dst_args, N> type;
|
||||
private:
|
||||
template<sprout::index_t... Indexes>
|
||||
static SPROUT_CONSTEXPR type call_impl(src_type const& e, sprout::index_tuple<Indexes...>) {
|
||||
return type(e.template child<Indexes>()...);
|
||||
}
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type call(src_type const& e) {
|
||||
return call_impl(sprout::index_pack<Args...>::make());
|
||||
}
|
||||
};
|
||||
template<typename Tag, typename... Args>
|
||||
struct by_value_generator_<
|
||||
sprout::breed::basic_expr<Tag, sprout::breed::list<Args...>, sizeof...(Args)>
|
||||
> {
|
||||
public:
|
||||
typedef sprout::breed::list<Args...> src_args;
|
||||
typedef sprout::breed::list<typename sprout::breed::detail::uncvref<Args>::type...> dst_args;
|
||||
typedef sprout::breed::basic_expr<Tag, src_args, N> src_type;
|
||||
typedef sprout::breed::basic_expr<Tag, dst_args, N> type;
|
||||
private:
|
||||
template<sprout::index_t... Indexes>
|
||||
static SPROUT_CONSTEXPR type call_impl(src_type const& e, sprout::index_tuple<Indexes...>) {
|
||||
return type(e.template child<Indexes>()...);
|
||||
}
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type call(src_type const& e) {
|
||||
return call_impl(sprout::index_pack<Args...>::make());
|
||||
}
|
||||
};
|
||||
} // namespace detail
|
||||
|
||||
//
|
||||
// use_basic_expr
|
||||
//
|
||||
template<typename Generator>
|
||||
struct use_basic_expr
|
||||
: public Generator
|
||||
{
|
||||
public:
|
||||
SPROUT_BREED_USE_BASIC_EXPR();
|
||||
};
|
||||
|
||||
//
|
||||
// default_generator
|
||||
//
|
||||
struct default_generator {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef Expr type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
#ifdef SPROUT_BREED_STRICT_RESULT_OF
|
||||
SPROUT_CONSTEXPR Expr
|
||||
#else
|
||||
SPROUT_CONSTEXPR Expr const&
|
||||
#endif
|
||||
operator()(Expr const& e) const {
|
||||
return e;
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// basic_default_generator
|
||||
//
|
||||
struct basic_default_generator
|
||||
: public sprout::breed::use_basic_expr<sprout::breed::default_generator>
|
||||
{};
|
||||
|
||||
//
|
||||
// generator
|
||||
//
|
||||
template<template<typename> class Extends>
|
||||
struct generator {
|
||||
SPROUT_BREED_CALLABLE()
|
||||
SPROUT_BREED_USE_BASIC_EXPR()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr&)> {
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr const&)>
|
||||
{
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR Extends<Expr> operator()(Expr const& e) const {
|
||||
return Extends<Expr>(e);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// pod_generator
|
||||
//
|
||||
template<template<typename> class Extends>
|
||||
struct pod_generator {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
SPROUT_BREED_USE_BASIC_EXPR()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr&)> {
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr const&)> {
|
||||
public:
|
||||
typedef Extends<Expr> type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR Extends<Expr> operator()(Expr const& e) const {
|
||||
return Extends<Expr>(e);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// by_value_generator
|
||||
//
|
||||
struct by_value_generator {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::by_value_generator_<Expr>::type type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr&)> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::by_value_generator_<Expr>::type type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr const&)> {
|
||||
public:
|
||||
typedef typename sprout::breed::detail::by_value_generator_<Expr>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result<by_value_generator(Expr)>::type operator()(Expr const& e) const {
|
||||
return sprout::breed::detail::by_value_generator_<Expr>::call(e);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// compose_generators
|
||||
//
|
||||
template<typename First, typename Second>
|
||||
struct compose_generators {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename Second::template result<
|
||||
Second(typename First::template result<First(Expr)>::type)
|
||||
>::type type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr&)> {
|
||||
public:
|
||||
typedef typename Second::template result<
|
||||
Second(typename First::template result<First(Expr)>::type)
|
||||
>::type type;
|
||||
};
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr const&)> {
|
||||
public:
|
||||
typedef typename Second::template result<
|
||||
Second(typename First::template result<First(Expr)>::type)
|
||||
>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result<compose_generators(Expr)>::type operator()(Expr const& e) const {
|
||||
return Second()(First()(e));
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// wants_basic_expr
|
||||
//
|
||||
template<typename Generator, typename Void>
|
||||
struct wants_basic_expr
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename Generator>
|
||||
struct wants_basic_expr<Generator, typename Generator::breed_use_basic_expr_>
|
||||
: public std::true_type
|
||||
{};
|
||||
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<>
|
||||
struct is_callable<default_generator>
|
||||
: public std::true_type
|
||||
{};
|
||||
template<template<typename> class Extends>
|
||||
struct is_callable<sprout::breed::generator<Extends> >
|
||||
: public std::true_type
|
||||
{};
|
||||
template<template<typename> class Extends>
|
||||
struct is_callable<sprout::breed::pod_generator<Extends> >
|
||||
: public std::true_type
|
||||
{};
|
||||
template<>
|
||||
struct is_callable<sprout::breed::by_value_generator>
|
||||
: public std::true_type
|
||||
{};
|
||||
template<typename First, typename Second>
|
||||
struct is_callable<sprout::breed::compose_generators<First, Second> >
|
||||
: public std::true_type
|
||||
{};
|
||||
|
||||
namespace detail {
|
||||
template<typename Expr>
|
||||
struct std_result_of<sprout::breed::default_domain(Expr)> {
|
||||
public:
|
||||
typedef Expr type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct std_result_of<sprout::breed::basic_default_domain(Expr)> {
|
||||
public:
|
||||
typedef Expr type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct std_result_of<sprout::breed::default_generator(Expr)> {
|
||||
public:
|
||||
typedef Expr type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct std_result_of<sprout::breed::basic_default_generator(Expr)> {
|
||||
public:
|
||||
typedef Expr type;
|
||||
};
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_GENERATE_HPP
|
|
@ -1,18 +0,0 @@
|
|||
#ifndef SPROUT_BREED_MATCHES_HPP
|
||||
#define SPROUT_BREED_MATCHES_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/traits.hpp>
|
||||
#include <sprout/breed/transform/when.hpp>
|
||||
#include <sprout/breed/transform/impl.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
} // namespace detail
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_MATCHES_HPP
|
|
@ -1,62 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TAGS_HPP
|
||||
#define SPROUT_BREED_TAGS_HPP
|
||||
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace tagns_ {
|
||||
namespace tag {
|
||||
struct terminal {};
|
||||
struct unary_plus {};
|
||||
struct negate {};
|
||||
struct dereference {};
|
||||
struct complement {};
|
||||
struct address_of {};
|
||||
struct logical_not {};
|
||||
struct pre_inc {};
|
||||
struct pre_dec {};
|
||||
struct post_inc {};
|
||||
struct post_dec {};
|
||||
struct shift_left {};
|
||||
struct shift_right {};
|
||||
struct multiplies {};
|
||||
struct divides {};
|
||||
struct modulus {};
|
||||
struct plus {};
|
||||
struct minus {};
|
||||
struct less {};
|
||||
struct greater {};
|
||||
struct less_equal {};
|
||||
struct greater_equal {};
|
||||
struct equal_to {};
|
||||
struct not_equal_to {};
|
||||
struct logical_or {};
|
||||
struct logical_and {};
|
||||
struct bitwise_and {};
|
||||
struct bitwise_or {};
|
||||
struct bitwise_xor {};
|
||||
struct comma {};
|
||||
struct mem_ptr {};
|
||||
struct assign {};
|
||||
struct shift_left_assign {};
|
||||
struct shift_right_assign {};
|
||||
struct multiplies_assign {};
|
||||
struct divides_assign {};
|
||||
struct modulus_assign {};
|
||||
struct plus_assign {};
|
||||
struct minus_assign {};
|
||||
struct bitwise_and_assign {};
|
||||
struct bitwise_or_assign {};
|
||||
struct bitwise_xor_assign {};
|
||||
struct subscript {};
|
||||
struct member {};
|
||||
struct if_else_ {};
|
||||
struct function {};
|
||||
} // namespace tag
|
||||
} // namespace tagns_
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TAGS_HPP
|
|
@ -1,926 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TRAITS_HPP
|
||||
#define SPROUT_BREED_TRAITS_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/utility/pack.hpp>
|
||||
#include <sprout/tuple/tuple.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
#include <sprout/breed/domain.hpp>
|
||||
#include <sprout/breed/transform/pass_through.hpp>
|
||||
#include <sprout/breed/detail/template_arity.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<typename T, typename Void = void>
|
||||
struct if_vararg {};
|
||||
template<typename T>
|
||||
struct if_vararg<T, typename T::breed_is_vararg_>
|
||||
: public T
|
||||
{};
|
||||
|
||||
template<typename T, typename Void = void>
|
||||
struct is_callable2_
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_callable2_<T, typename T::breed_is_callable_>
|
||||
: public std::true_type
|
||||
{};
|
||||
template<typename T, long Arity = sprout::breed::detail::template_arity<T>::value>
|
||||
struct is_callable_
|
||||
: public sprout::breed::detail::is_callable2_<T>
|
||||
{};
|
||||
} // namespace detail
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<typename T>
|
||||
struct is_callable
|
||||
: public sprout::breed::detail::is_callable_<T>
|
||||
{};
|
||||
template<>
|
||||
struct is_callable<sprout::breed::_>
|
||||
: public std::true_type
|
||||
{};
|
||||
template<>
|
||||
struct is_callable<sprout::breed::callable>
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename PrimitiveTransform, typename X>
|
||||
struct is_callable<sprout::breed::transform<PrimitiveTransform, X> >
|
||||
: public std::false_type
|
||||
{};
|
||||
|
||||
namespace detail {
|
||||
template<typename T, typename Void>
|
||||
struct is_transform_
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_transform_<T, typename T::breed_is_transform_>
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace detail
|
||||
//
|
||||
// is_transform
|
||||
//
|
||||
template<typename T>
|
||||
struct is_transform
|
||||
: public sprout::breed::detail::is_transform_<T>
|
||||
{};
|
||||
|
||||
namespace detail {
|
||||
template<typename T, typename Void>
|
||||
struct is_aggregate_
|
||||
: public std::is_pod<T>
|
||||
{};
|
||||
template<typename Tag, typename Args, long N>
|
||||
struct is_aggregate_<sprout::breed::expr<Tag, Args, N>, void>
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename Tag, typename Args, long N>
|
||||
struct is_aggregate_<sprout::breed::basic_expr<Tag, Args, N>, void>
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_aggregate_<T, typename T::breed_is_aggregate_>
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace detail
|
||||
//
|
||||
// is_transform
|
||||
//
|
||||
template<typename T>
|
||||
struct is_aggregate
|
||||
: public sprout::breed::detail::is_aggregate_<T>
|
||||
{};
|
||||
|
||||
//
|
||||
// is_transform
|
||||
//
|
||||
template<typename T, typename Void>
|
||||
struct is_expr
|
||||
: public std::false_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_expr<T, typename T::breed_is_expr_>
|
||||
: public std::true_type
|
||||
{};
|
||||
template<typename T>
|
||||
struct is_expr<T&, void>
|
||||
: public is_expr<T>
|
||||
{};
|
||||
|
||||
//
|
||||
// tag_of
|
||||
//
|
||||
template<typename Expr>
|
||||
struct tag_of {
|
||||
public:
|
||||
typedef typename Expr::breed_tag type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct tag_of<Expr&> {
|
||||
public:
|
||||
typedef typename Expr::breed_tag type;
|
||||
};
|
||||
|
||||
//
|
||||
// arity_of
|
||||
//
|
||||
template<typename Expr>
|
||||
struct arity_of
|
||||
: public Expr::breed_arity
|
||||
{};
|
||||
template<typename Expr>
|
||||
struct arity_of<Expr&>
|
||||
: public Expr::breed_arity
|
||||
{};
|
||||
|
||||
namespace result_of {
|
||||
//
|
||||
// as_expr
|
||||
//
|
||||
template<typename T, typename Domain>
|
||||
struct as_expr {
|
||||
public:
|
||||
typedef typename Domain::template as_expr<T>::result_type type;
|
||||
};
|
||||
|
||||
//
|
||||
// as_child
|
||||
//
|
||||
template<typename T, typename Domain>
|
||||
struct as_child {
|
||||
public:
|
||||
typedef typename Domain::template as_child<T>::result_type type;
|
||||
};
|
||||
|
||||
//
|
||||
// child
|
||||
//
|
||||
template<typename Expr, typename N>
|
||||
struct child
|
||||
: public child_c<Expr, N::value>
|
||||
{};
|
||||
|
||||
//
|
||||
// value
|
||||
//
|
||||
template<typename Expr>
|
||||
struct value {
|
||||
static_assert(0 == Expr::breed_arity_c, "0 == Expr::breed_arity_c");
|
||||
public:
|
||||
typedef typename Expr::template breed_child<0>::type value_type;
|
||||
typedef typename sprout::breed::detail::term_traits<value_type>::value_type type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct value<Expr&> {
|
||||
static_assert(0 == Expr::breed_arity_c, "0 == Expr::breed_arity_c");
|
||||
public:
|
||||
typedef typename Expr:template breed_child<0>::type value_type;
|
||||
typedef typename sprout::breed::detail::term_traits<value_type>::reference type;
|
||||
};
|
||||
template<typename Expr>
|
||||
struct value<Expr const&> {
|
||||
static_assert(0 == Expr::breed_arity_c, "0 == Expr::breed_arity_c");
|
||||
public:
|
||||
typedef typename Expr:template breed_child<0>::type value_type;
|
||||
typedef typename sprout::breed::detail::term_traits<value_type>::const_reference type;
|
||||
};
|
||||
|
||||
//
|
||||
// left
|
||||
//
|
||||
template<typename Expr>
|
||||
struct left
|
||||
: public sprout::breed::result_of::child_c<Expr, 0>
|
||||
{};
|
||||
//
|
||||
// right
|
||||
//
|
||||
template<typename Expr>
|
||||
struct right
|
||||
: public child_c<Expr, 1>
|
||||
{};
|
||||
} // namespace result_of
|
||||
|
||||
//
|
||||
// terminal
|
||||
//
|
||||
template<typename T>
|
||||
struct terminal
|
||||
: public sprout::breed::transform<sprout::breed::terminal<T>, int>
|
||||
{
|
||||
public:
|
||||
typedef sprout::breed::tag::terminal breed_tag;
|
||||
typedef sprout::breed::expr<sprout::breed::tag::terminal, sprout::breed::term<T>, 0> type;
|
||||
typedef sprout::breed::basic_expr<sprout::breed::tag::terminal, sprout::breed::term<T>, 0> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, T>
|
||||
{};
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef Expr result_type;
|
||||
public:
|
||||
#ifdef SPROUT_BREED_STRICT_RESULT_OF
|
||||
SPROUT_CONSTEXPR result_type
|
||||
#else
|
||||
SPROUT_CONSTEXPR typename impl::expr_param
|
||||
#endif
|
||||
operator()(
|
||||
typename impl::expr_param e,
|
||||
typename impl::state_param,
|
||||
typename impl::data_param
|
||||
) const
|
||||
{
|
||||
return e;
|
||||
}
|
||||
};
|
||||
};
|
||||
|
||||
//
|
||||
// if_else_
|
||||
//
|
||||
template<typename T, typename U, typename V>
|
||||
struct if_else_
|
||||
: public sprout::breed::transform<if_else_<T, U, V>, int>
|
||||
{
|
||||
public:
|
||||
typedef sprout::breed::tag::if_else_ breed_tag;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::if_else_, sprout::breed::sprout::breed::list<T, U, V>,
|
||||
3
|
||||
> type;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::if_else_,
|
||||
sprout::breed::sprout::breed::list<T, U, V>,
|
||||
3
|
||||
> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, T, U, V>
|
||||
{};
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<sprout::breed::if_else_, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
//
|
||||
// nullary_expr
|
||||
//
|
||||
template<typename Tag, typename T>
|
||||
struct nullary_expr
|
||||
: public sprout::breed::transform<sprout::breed::nullary_expr<Tag, T>, int>
|
||||
{
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef sprout::breed::expr<Tag, sprout::breed::term<T>, 0> type;
|
||||
typedef sprout::breed::basic_expr<Tag, sprout::breed::term<T>, 0> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, T>
|
||||
{};
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef Expr result_type;
|
||||
public:
|
||||
#ifdef SPROUT_BREED_STRICT_RESULT_OF
|
||||
SPROUT_CONSTEXPR result_type
|
||||
#else
|
||||
SPROUT_CONSTEXPR typename impl::expr_param
|
||||
#endif
|
||||
operator()(
|
||||
typename impl::expr_param e,
|
||||
typename impl::state_param,
|
||||
typename impl::data_param
|
||||
) const
|
||||
{
|
||||
return e;
|
||||
}
|
||||
};
|
||||
};
|
||||
|
||||
//
|
||||
// unary_expr
|
||||
//
|
||||
template<typename Tag, typename T>
|
||||
struct unary_expr
|
||||
: public sprout::breed::transform<sprout::breed::unary_expr<Tag, T>, int>
|
||||
{
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef sprout::breed::expr<Tag, sprout::breed::sprout::breed::list<T>, 1> type;
|
||||
typedef sprout::breed::basic_expr<Tag, sprout::breed::sprout::breed::list<T>, 1> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, T>
|
||||
{};
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<sprout::breed::unary_expr, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
//
|
||||
// binary_expr
|
||||
//
|
||||
template<typename Tag, typename T, typename U>
|
||||
struct binary_expr
|
||||
: public sprout::breed::transform<sprout::breed::binary_expr<Tag, T, U>, int>
|
||||
{
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef sprout::breed::expr<Tag, sprout::breed::list<T, U>, 2> type;
|
||||
typedef sprout::breed::basic_expr<Tag, sprout::breed::list<T, U>, 2> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child
|
||||
: public sprout::tppack_at<N, T, U>
|
||||
{};
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<binary_expr, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
# define SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(op) \
|
||||
template<typename T> \
|
||||
struct op \
|
||||
: public sprout::breed::transform<op<T>, int> \
|
||||
{ \
|
||||
public: \
|
||||
typedef sprout::breed::tag::op breed_tag; \
|
||||
typedef sprout::breed::expr<sprout::breed::tag::op, sprout::breed::list<T>, 1> type; \
|
||||
typedef sprout::breed::basic_expr<sprout::breed::tag::op, sprout::breed::list<T>, 1> breed_grammar; \
|
||||
public: \
|
||||
template<long N> \
|
||||
struct breed_child \
|
||||
: public sprout::tppack_at<N, T> \
|
||||
{}; \
|
||||
public: \
|
||||
template<typename Expr, typename State, typename Data> \
|
||||
struct impl \
|
||||
: public sprout::breed::detail::pass_through_impl<op, Expr, State, Data> \
|
||||
{}; \
|
||||
};
|
||||
# define SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(op) \
|
||||
template<typename T, typename U> \
|
||||
struct op \
|
||||
: public sprout::breed::transform<op<T, U>, int> \
|
||||
{ \
|
||||
public: \
|
||||
typedef sprout::breed::tag::op breed_tag; \
|
||||
typedef sprout::breed::expr<sprout::breed::tag::op, sprout::breed::list<T, U>, 2> type; \
|
||||
typedef sprout::breed::basic_expr<sprout::breed::tag::op, sprout::breed::list<T, U>, 2> breed_grammar; \
|
||||
public: \
|
||||
template<long N> \
|
||||
struct breed_child \
|
||||
: public sprout::tppack_at<N, T, U> \
|
||||
{}; \
|
||||
public: \
|
||||
template<typename Expr, typename State, typename Data> \
|
||||
struct impl \
|
||||
: public sprout::breed::detail::pass_through_impl<op, Expr, State, Data> \
|
||||
{}; \
|
||||
};
|
||||
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(unary_plus)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(negate)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(dereference)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(complement)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(address_of)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(logical_not)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(pre_inc)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(pre_dec)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(post_inc)
|
||||
SPROUT_BREED_DEFINE_UNARY_METAFUNCTION(post_dec)
|
||||
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(shift_left)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(shift_right)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(multiplies)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(divides)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(modulus)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(plus)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(minus)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(less)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(greater)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(less_equal)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(greater_equal)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(equal_to)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(not_equal_to)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(logical_or)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(logical_and)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_or)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_and)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_xor)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(comma)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(mem_ptr)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(shift_left_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(shift_right_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(multiplies_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(divides_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(modulus_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(plus_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(minus_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_or_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_and_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(bitwise_xor_assign)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(subscript)
|
||||
SPROUT_BREED_DEFINE_BINARY_METAFUNCTION(member)
|
||||
|
||||
# undef SPROUT_BREED_DEFINE_UNARY_METAFUNCTION
|
||||
# undef SPROUT_BREED_DEFINE_BINARY_METAFUNCTION
|
||||
|
||||
//
|
||||
// function
|
||||
//
|
||||
template<typename... Args>
|
||||
struct function
|
||||
: public sprout::breed::transform<
|
||||
sprout::breed::function<Args...>,
|
||||
int
|
||||
>
|
||||
{
|
||||
public:
|
||||
typedef sprout::breed::tag::function breed_tag;
|
||||
typedef sprout::breed::expr<
|
||||
sprout::breed::tag::function, sprout::breed::list<Args...>,
|
||||
sizeof...(Args)
|
||||
> type;
|
||||
typedef sprout::breed::basic_expr<
|
||||
sprout::breed::tag::function, sprout::breed::list<Args...>,
|
||||
sizeof...(Args)
|
||||
> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child {
|
||||
public:
|
||||
typedef std::conditional<
|
||||
N < sizeof...(Args),
|
||||
sprout::tppack_at<N, Args...>,
|
||||
sprout::breed::detail::if_vararg<typename sprout::tppack_at<sizeof...(Args) - 1, Args...>::type>
|
||||
>::type::type
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<function, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
//
|
||||
// nary_expr
|
||||
//
|
||||
template<typename Tag, typename... Args>
|
||||
struct nary_expr
|
||||
: public sprout::breed::transform<
|
||||
sprout::breed::nary_expr<Tag, Args...>,
|
||||
int
|
||||
>
|
||||
{
|
||||
public:
|
||||
typedef Tag breed_tag;
|
||||
typedef sprout::breed::expr<
|
||||
Tag,
|
||||
sprout::breed::list<Args...>,
|
||||
sizeof...(Args)
|
||||
> type;
|
||||
typedef sprout::breed::basic_expr<
|
||||
Tag,
|
||||
sprout::breed::list<Args...>,
|
||||
sizeof...(Args)
|
||||
> breed_grammar;
|
||||
public:
|
||||
template<long N>
|
||||
struct breed_child {
|
||||
public:
|
||||
typedef std::conditional<
|
||||
N < sizeof...(Args),
|
||||
sprout::tppack_at<N, Args...>,
|
||||
sprout::breed::detail::if_vararg<typename sprout::tppack_at<sizeof...(Args) - 1, Args...>::type>
|
||||
>::type::type
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<sprout::breed::nary_expr, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
namespace detail {
|
||||
template<template<typename...> class T, typename... Args>
|
||||
struct is_callable_<T<Args...>, sizeof...(Args)>
|
||||
: public std::is_same<
|
||||
typename sprout::tppack_at<sizeof...(Args) - 1, Args...>::type,
|
||||
sprout::breed::callable
|
||||
>
|
||||
{};
|
||||
} // namespace detail
|
||||
|
||||
namespace result_of {
|
||||
//
|
||||
// child_c
|
||||
//
|
||||
template<typename Expr, long N>
|
||||
struct child_c {
|
||||
static_assert(0 != Expr::proto_arity_c, "0 != Expr::proto_arity_c");
|
||||
public:
|
||||
typedef typename Expr::template breed_child<N>::type value_type;
|
||||
typedef typename sprout::breed::detail::expr_traits<value_type>::value_type type;
|
||||
};
|
||||
template<typename Expr, long N>
|
||||
struct child_c<Expr&, N> {
|
||||
static_assert(0 != Expr::proto_arity_c, "0 != Expr::proto_arity_c");
|
||||
public:
|
||||
typedef typename Expr::template breed_child<N>::type value_type;
|
||||
typedef typename detail::expr_traits<value_type>::reference type;
|
||||
public:
|
||||
static type call(Expr& e) {
|
||||
return e.proto_base().breed child<N>();
|
||||
}
|
||||
};
|
||||
template<typename Expr, long N>
|
||||
struct child_c<Expr const&, N> {
|
||||
static_assert(0 != Expr::proto_arity_c, "0 != Expr::proto_arity_c");
|
||||
public:
|
||||
typedef typename Expr::template breed_child<N>::type value_type;
|
||||
typedef typename detail::expr_traits<value_type>::const_reference type;
|
||||
public:
|
||||
static SPROUT_CONSTEXPR type call(Expr const& e) {
|
||||
return e.proto_base().breed child<N>();
|
||||
}
|
||||
};
|
||||
} // namespace result_of
|
||||
|
||||
namespace functional {
|
||||
//
|
||||
// as_expr
|
||||
//
|
||||
template<typename Domain>
|
||||
struct as_expr {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename T>
|
||||
struct result<This(T)> {
|
||||
typedef typename Domain::template as_expr<T>::result_type type;
|
||||
};
|
||||
template<typename This, typename T>
|
||||
struct result<This(T&)> {
|
||||
typedef typename Domain::template as_expr<T>::result_type type;
|
||||
};
|
||||
public:
|
||||
template<typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename result<sprout::breed::as_expr(T const&)>::type
|
||||
>::type operator()(T const& t) const {
|
||||
return typename Domain::template as_expr<T const>()(t);
|
||||
}
|
||||
template<typename T>
|
||||
typename std::add_const<
|
||||
typename result<sprout::breed::as_expr(T&)>::type
|
||||
>::type operator()(T& t) const {
|
||||
return typename Domain::template as_expr<T>()(t);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// as_child
|
||||
//
|
||||
template<typename Domain>
|
||||
struct as_child {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename T>
|
||||
struct result<This(T)> {
|
||||
public:
|
||||
typedef typename Domain::template as_child<T>::result_type type;
|
||||
};
|
||||
template<typename This, typename T>
|
||||
struct result<This(T&)> {
|
||||
public:
|
||||
typedef typename Domain::template as_child<T>::result_type type;
|
||||
};
|
||||
public:
|
||||
template<typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename result<as_child(T const&)>::type
|
||||
>::type operator()(T const& t) const {
|
||||
return typename Domain::template as_child<T const>()(t);
|
||||
}
|
||||
template<typename T>
|
||||
typename std::add_const<
|
||||
typename result<as_child(T&)>::type
|
||||
>::type operator()(T& t) const {
|
||||
return typename Domain::template as_child<T const>()(t);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// child_c
|
||||
//
|
||||
template<long N>
|
||||
struct child_c {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename result_of::child_c<Expr, N>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result_of::child_c<Expr const&, N>::type operator()(Expr const& e) const {
|
||||
return result_of::child_c<Expr const&, N>::call(e);
|
||||
}
|
||||
template<typename Expr>
|
||||
typename result_of::child_c<Expr const&, N>::type operator()(Expr& e) const {
|
||||
return result_of::child_c<Expr&, N>::call(e);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// child
|
||||
//
|
||||
template<typename N>
|
||||
struct child {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename result_of::child<Expr, N>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result_of::child<Expr const&, N>::type operator()(Expr const& e) const {
|
||||
return result_of::child<Expr const&, N>::call(e);
|
||||
}
|
||||
template<typename Expr>
|
||||
typename result_of::child<Expr&, N>::type operator()(Expr const& e) const {
|
||||
return result_of::child<Expr&, N>::call(e);
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// value
|
||||
//
|
||||
struct value {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename result_of::value<Expr>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result_of::value<Expr const&>::type operator()(Expr const& e) const {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename result_of::value<Expr&>::type operator()(Expr& e) const {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// left
|
||||
//
|
||||
struct left {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename result_of::left<Expr>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result_of::value<Expr const&>::type operator()(Expr const& e) const {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename result_of::value<Expr&>::type operator()(Expr& e) const {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
};
|
||||
|
||||
//
|
||||
// right
|
||||
//
|
||||
struct right {
|
||||
public:
|
||||
SPROUT_BREED_CALLABLE()
|
||||
public:
|
||||
template<typename Sig>
|
||||
struct result;
|
||||
template<typename This, typename Expr>
|
||||
struct result<This(Expr)> {
|
||||
public:
|
||||
typedef typename result_of::right<Expr>::type type;
|
||||
};
|
||||
public:
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename result_of::value<Expr const&>::type operator()(Expr const& e) const {
|
||||
return e.breed_base().template child<1>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename result_of::value<Expr&>::type operator()(Expr& e) const {
|
||||
return e.breed_base().template child<1>();
|
||||
}
|
||||
};
|
||||
} // namespace functional
|
||||
|
||||
//
|
||||
// as_expr
|
||||
//
|
||||
template<typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename sprout::breed::result_of::as_expr<T const, sprout::breed::default_domain>::type
|
||||
>::type as_expr(T const& t) {
|
||||
return sprout::breed::default_domain::as_expr<T const>()(t);
|
||||
}
|
||||
template<typename T>
|
||||
typename std::add_const<
|
||||
typename sprout::breed::result_of::as_expr<T, sprout::breed::default_domain>::type
|
||||
>::type as_expr(T& t) {
|
||||
return sprout::breed::default_domain::as_expr<T>()(t);
|
||||
}
|
||||
template<typename Domain, typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename sprout::breed::result_of::as_expr<T const, Domain>::type
|
||||
>::type as_expr(T const& t) {
|
||||
return typename Domain::template as_expr<T const>()(t);
|
||||
}
|
||||
template<typename Domain, typename T>
|
||||
typename std::add_const<
|
||||
typename sprout::breed::result_of::as_expr<T, Domain>::type
|
||||
>::type as_expr(T& t) {
|
||||
return typename Domain::template as_expr<T>()(t);
|
||||
}
|
||||
|
||||
//
|
||||
// as_child
|
||||
//
|
||||
template<typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename sprout::breed::result_of::as_child<T const, sprout::breed::default_domain>::type
|
||||
>::type as_child(T const& t)
|
||||
{
|
||||
return sprout::breed::default_domain::as_child<T const>()(t);
|
||||
}
|
||||
template<typename T>
|
||||
typename std::add_const<
|
||||
typename sprout::breed::result_of::as_child<T, sprout::breed::default_domain>::type
|
||||
>::type as_child(T& t)
|
||||
{
|
||||
return sprout::breed::default_domain::as_child<T>()(t);
|
||||
}
|
||||
template<typename Domain, typename T>
|
||||
SPROUT_CONSTEXPR typename std::add_const<
|
||||
typename sprout::breed::result_of::as_child<T const, Domain>::type
|
||||
>::type as_child(T const& t)
|
||||
{
|
||||
return typename Domain::template as_child<T const>()(t);
|
||||
}
|
||||
template<typename Domain, typename T>
|
||||
typename std::add_const<
|
||||
typename sprout::breed::result_of::as_child<T, Domain>::type
|
||||
>::type as_child(T& t)
|
||||
{
|
||||
return typename Domain::template as_child<T>()(t);
|
||||
}
|
||||
|
||||
//
|
||||
// child
|
||||
//
|
||||
template<typename N, typename Expr>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::child<Expr const&, N>::type child(Expr const& e) {
|
||||
return sprout::breed::result_of::child<Expr const&, N>::call(e);
|
||||
}
|
||||
template<typename N, typename Expr>
|
||||
typename sprout::breed::result_of::child<Expr&, N>::type child(Expr& e) {
|
||||
return sprout::breed::result_of::child<Expr&, N>::call(e);
|
||||
}
|
||||
template<typename Expr2>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::detail::expr_traits<
|
||||
typename Expr2::breed_base_expr:template breed_child<0>::type
|
||||
>::const_reference child(Expr2 const& expr2) {
|
||||
return expr2.breed_base().template child<0>();
|
||||
}
|
||||
template<typename Expr2>
|
||||
typename sprout::breed::detail::expr_traits<
|
||||
typename Expr2::breed_base_expr:template breed_child<0>::type
|
||||
>::reference child(Expr2& expr2) {
|
||||
return expr2.breed_base().template child<0>();
|
||||
}
|
||||
|
||||
//
|
||||
// child_c
|
||||
//
|
||||
template<long N, typename Expr>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::child_c<Expr const&, N>::type child_c(Expr const& e) {
|
||||
return sprout::breed::result_of::child_c<Expr const&, N>::call(e);
|
||||
}
|
||||
template<long N, typename Expr>
|
||||
typename sprout::breed::result_of::child_c<Expr&, N>::type child_c(Expr& e) {
|
||||
return sprout::breed::result_of::child_c<Expr&, N>::call(e);
|
||||
}
|
||||
|
||||
//
|
||||
// value
|
||||
//
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::value<Expr const&>::type value(Expr const& e) {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename sprout::breed::result_of::value<Expr&>::type value(Expr& e) {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
|
||||
//
|
||||
// left
|
||||
//
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::left<Expr const&>::type left(Expr const& e) {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename sprout::breed::result_of::left<Expr&>::type left(Expr& e) {
|
||||
return e.breed_base().template child<0>();
|
||||
}
|
||||
|
||||
//
|
||||
// right
|
||||
//
|
||||
template<typename Expr>
|
||||
SPROUT_CONSTEXPR typename sprout::breed::result_of::right<Expr const&>::type right(Expr const& e) {
|
||||
return e.breed_base().template child<1>();
|
||||
}
|
||||
template<typename Expr>
|
||||
typename sprout::breed::result_of::right<Expr&>::type right(Expr& e) {
|
||||
return e.breed_base().template child<1>();
|
||||
}
|
||||
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<typename Domain>
|
||||
struct is_callable<sprout::breed::functional::as_expr<Domain> >
|
||||
: public std::true_type
|
||||
{};
|
||||
template<typename Domain>
|
||||
struct is_callable<sprout::breed::functional::as_child<Domain> >
|
||||
: public std::true_type
|
||||
{};
|
||||
template<long N>
|
||||
struct is_callable<sprout::breed::functional::child_c<N> >
|
||||
: public std::true_type
|
||||
{};
|
||||
template<typename N>
|
||||
struct is_callable<sprout::breed::functional::child<N> >
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TRAITS_HPP
|
|
@ -1,393 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TRANSFORM_CALL_HPP
|
||||
#define SPROUT_BREED_TRANSFORM_CALL_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/utility/pack.hpp>
|
||||
#include <sprout/type/type_tuple.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/traits.hpp>
|
||||
#include <sprout/breed/transform/impl.hpp>
|
||||
#include <sprout/breed/detail/std_result_of.hpp>
|
||||
#include <sprout/breed/detail/as_lvalue.hpp>
|
||||
#include <sprout/breed/detail/poly_function.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
//
|
||||
// call
|
||||
//
|
||||
template<typename PrimitiveTransform>
|
||||
struct call
|
||||
: public PrimitiveTransform
|
||||
{};
|
||||
template<typename Fun>
|
||||
struct call<Fun()>
|
||||
: public sprout::breed::transform<sprout::breed::call<Fun()> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data, bool B>
|
||||
struct impl2
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef typename sprout::breed::detail::std_result_of<Fun()>::type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(
|
||||
typename impl2::expr_param,
|
||||
typename impl2::state_param,
|
||||
typename impl2::data_param
|
||||
) const
|
||||
{
|
||||
return Fun()();
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl2<Expr, State, Data, true>
|
||||
: public Fun::template impl<Expr, State, Data>
|
||||
{};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public impl2<Expr, State, Data, sprout::breed::detail::is_transform_<Fun>::value>
|
||||
{};
|
||||
};
|
||||
template<typename Fun, typename A0>
|
||||
struct call<Fun(A0)>
|
||||
: public sprout::breed::transform<sprout::breed::call<Fun(A0)> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data, bool B>
|
||||
struct impl2
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
template<typename... Args>
|
||||
struct fun_ {
|
||||
public:
|
||||
typedef Fun type(typename a_<Args>::type::result_type...);
|
||||
};
|
||||
template<typename... Args>
|
||||
struct function_
|
||||
: public sprout::breed::detail::poly_function_traits<
|
||||
Fun,
|
||||
typename fun_<Args...>::type
|
||||
>
|
||||
{};
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0>::type>::type::result_type type;
|
||||
};
|
||||
typedef function_<A0> function_traits;
|
||||
typedef typename function_traits::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return typename function_traits::function_type()(
|
||||
sprout::breed::detail::as_lvalue(a_<A0>()(e, s, d))
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl2<Expr, State, Data, true>
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
typedef Fun::template impl<typename a_<A0>::type, State, Data> function_;
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0>::type>::type::result_type type;
|
||||
};
|
||||
typedef template function_::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return function_()(
|
||||
typename a_<A0>::type()(e, s, d),
|
||||
s,
|
||||
d
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public impl2<Expr, State, Data, sprout::breed::detail::is_transform_<Fun>::value>
|
||||
{};
|
||||
};
|
||||
template<typename Fun, typename A0, typename A1>
|
||||
struct call<Fun(A0, A1)>
|
||||
: public sprout::breed::transform<sprout::breed::call<Fun(A0, A1)> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data, bool B>
|
||||
struct impl2
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
template<typename... Args>
|
||||
struct fun_ {
|
||||
public:
|
||||
typedef Fun type(typename a_<Args>::type::result_type...);
|
||||
};
|
||||
template<typename... Args>
|
||||
struct function_
|
||||
: public sprout::breed::detail::poly_function_traits<
|
||||
Fun,
|
||||
typename fun_<Args...>::type
|
||||
>
|
||||
{};
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0, A1>::type>::type::result_type type;
|
||||
};
|
||||
typedef function_<A0, A1> function_traits;
|
||||
typedef typename function_traits::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return typename function_traits::function_type()(
|
||||
sprout::breed::detail::as_lvalue(a_<A0>()(e, s, d)),
|
||||
sprout::breed::detail::as_lvalue(a_<A1>()(e, s, d))
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl2<Expr, State, Data, true>
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
typedef Fun::template impl<typename a_<A0>::type, typename a_<A1>::type, Data> function_;
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0, A1>::type>::type::result_type type;
|
||||
};
|
||||
typedef template function_::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return function_()(
|
||||
typename a_<A0>::type()(e, s, d),
|
||||
typename a_<A1>::type()(e, s, d),
|
||||
d
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public impl2<Expr, State, Data, sprout::breed::detail::is_transform_<Fun>::value>
|
||||
{};
|
||||
};
|
||||
template<typename Fun, typename A0, typename A1, typename A2>
|
||||
struct call<Fun(A0, A1, A2)>
|
||||
: public sprout::breed::transform<sprout::breed::call<Fun(A0, A1, A2)> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data, bool B>
|
||||
struct impl2
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
template<typename... Args>
|
||||
struct fun_ {
|
||||
public:
|
||||
typedef Fun type(typename a_<Args>::type::result_type...);
|
||||
};
|
||||
template<typename... Args>
|
||||
struct function_
|
||||
: public sprout::breed::detail::poly_function_traits<
|
||||
Fun,
|
||||
typename fun_<Args...>::type
|
||||
>
|
||||
{};
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0, A1, A2>::type>::type::result_type type;
|
||||
};
|
||||
typedef function_<A0, A1, A2> function_traits;
|
||||
typedef typename function_traits::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return typename function_traits::function_type()(
|
||||
sprout::breed::detail::as_lvalue(a_<A0>()(e, s, d)),
|
||||
sprout::breed::detail::as_lvalue(a_<A1>()(e, s, d)),
|
||||
sprout::breed::detail::as_lvalue(a_<A2>()(e, s, d))
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl2<Expr, State, Data, true>
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
typedef Fun::template impl<typename a_<A0>::type, typename a_<A1>::type, typename a_<A2>::type> function_;
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, A0, A1, A2>::type>::type::result_type type;
|
||||
};
|
||||
typedef template function_::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return function_()(
|
||||
typename a_<A0>::type()(e, s, d),
|
||||
typename a_<A1>::type()(e, s, d),
|
||||
typename a_<A2>::type()(e, s, d)
|
||||
);
|
||||
}
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public impl2<Expr, State, Data, sprout::breed::detail::is_transform_<Fun>::value>
|
||||
{};
|
||||
};
|
||||
template<typename Fun, typename... Args>
|
||||
struct call<Fun(Args...)>
|
||||
: public sprout::breed::transform<sprout::breed::call<Fun(Args...)> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
private:
|
||||
template<typename A>
|
||||
struct a_ {
|
||||
public:
|
||||
typedef typename sprout::breed::when<sprout::breed::_, A>::template impl<
|
||||
Expr,
|
||||
State,
|
||||
Data
|
||||
> type;
|
||||
};
|
||||
template<typename... Args>
|
||||
struct fun_ {
|
||||
public:
|
||||
typedef Fun type(typename a_<Args>::type::result_type...);
|
||||
};
|
||||
template<typename... Args>
|
||||
struct function_
|
||||
: public sprout::breed::detail::poly_function_traits<
|
||||
Fun,
|
||||
typename fun_<Args...>::type
|
||||
>
|
||||
{};
|
||||
public:
|
||||
template<long N>
|
||||
struct a {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, Args...>::type>::type type;
|
||||
};
|
||||
template<long N>
|
||||
struct b {
|
||||
public:
|
||||
typedef typename a_<typename sprout::tppack_at<N, Args...>::type>::type::result_type type;
|
||||
};
|
||||
typedef function_<Args...> function_traits;
|
||||
typedef typename function_traits::result_type result_type;
|
||||
SPROUT_CONSTEXPR result_type operator ()(
|
||||
typename impl2::expr_param e,
|
||||
typename impl2::state_param s,
|
||||
typename impl2::data_param d
|
||||
) const
|
||||
{
|
||||
return typename function_traits::function_type()(
|
||||
sprout::breed::detail::as_lvalue(typename a_<Args>::type()(e, s, d))...
|
||||
);
|
||||
}
|
||||
};
|
||||
};
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<typename Fun>
|
||||
struct is_callable<sprout::breed::call<Fun> >
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TRANSFORM_CALL_HPP
|
|
@ -1,166 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TRANSFORM_IMPL_HPP
|
||||
#define SPROUT_BREED_TRANSFORM_IMPL_HPP
|
||||
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
//
|
||||
// SPROUT_BREED_TRANSFORM_
|
||||
//
|
||||
# define SPROUT_BREED_TRANSFORM_(PrimitiveTransform, X) \
|
||||
public: \
|
||||
SPROUT_BREED_CALLABLE() \
|
||||
typedef X breed_is_transform_; \
|
||||
typedef PrimitiveTransform transform_type; \
|
||||
public: \
|
||||
template<typename Sig> \
|
||||
struct result { \
|
||||
public: \
|
||||
typedef typename sprout::breed::detail::apply_transform<Sig>::result_type type; \
|
||||
}; \
|
||||
template<typename Expr> \
|
||||
SPROUT_CONSTEXPR typename sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&) \
|
||||
>::result_type operator()(Expr&& e) const { \
|
||||
return sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&) \
|
||||
>()(e, 0, 0); \
|
||||
} \
|
||||
template<typename Expr, typename State> \
|
||||
SPROUT_CONSTEXPR typename sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&, State const&) \
|
||||
>::result_type operator()(Expr&& e, State&& s) const \
|
||||
{ \
|
||||
return sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&, State const&) \
|
||||
>()(e, s, 0); \
|
||||
} \
|
||||
template<typename Expr, typename State, typename Data> \
|
||||
SPROUT_CONSTEXPR typename sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&, State const&, Data const&) \
|
||||
>::result_type operator()(Expr&& e, State&& s, Data&& d) const { \
|
||||
return sprout::breed::detail::apply_transform< \
|
||||
transform_type(Expr const&, State const&, Data const&) \
|
||||
>()(e, s, d); \
|
||||
}
|
||||
//
|
||||
// SPROUT_BREED_TRANSFORM
|
||||
//
|
||||
# define SPROUT_BREED_TRANSFORM(PrimitiveTransform) \
|
||||
SPROUT_BREED_TRANSFORM_(PrimitiveTransform, void)
|
||||
|
||||
namespace detail {
|
||||
template<typename Sig>
|
||||
struct apply_transform;
|
||||
template<typename PrimitiveTransform, typename Expr>
|
||||
struct apply_transform<PrimitiveTransform(Expr)>
|
||||
: public PrimitiveTransform::template impl<Expr, int, int>
|
||||
{};
|
||||
template<typename PrimitiveTransform, typename Expr, typename State>
|
||||
struct apply_transform<PrimitiveTransform(Expr, State)>
|
||||
: public PrimitiveTransform::template impl<Expr, State, int>
|
||||
{};
|
||||
template<typename PrimitiveTransform, typename Expr, typename State, typename Data>
|
||||
struct apply_transform<PrimitiveTransform(Expr, State, Data)>
|
||||
: public PrimitiveTransform::template impl<Expr, State, Data>
|
||||
{};
|
||||
} // namespace detail
|
||||
|
||||
//
|
||||
// transform
|
||||
//
|
||||
template<typename PrimitiveTransform, typename X>
|
||||
struct transform {
|
||||
public:
|
||||
SPROUT_BREED_TRANSFORM_(PrimitiveTransform, X);
|
||||
};
|
||||
|
||||
//
|
||||
// transform_impl
|
||||
//
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl {
|
||||
public:
|
||||
typedef Expr const expr;
|
||||
typedef Expr const& expr_param;
|
||||
typedef State const state;
|
||||
typedef State const& state_param;
|
||||
typedef Data const data;
|
||||
typedef Data const& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr&, State, Data> {
|
||||
public:
|
||||
typedef Expr expr;
|
||||
typedef Expr& expr_param;
|
||||
typedef State const state;
|
||||
typedef State const& state_param;
|
||||
typedef Data const data;
|
||||
typedef Data const& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr, State&, Data> {
|
||||
public:
|
||||
typedef Expr const expr;
|
||||
typedef Expr const& expr_param;
|
||||
typedef State state;
|
||||
typedef State& state_param;
|
||||
typedef Data const data;
|
||||
typedef Data const& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr, State, Data&> {
|
||||
public:
|
||||
typedef Expr const expr;
|
||||
typedef Expr const& expr_param;
|
||||
typedef State const state;
|
||||
typedef State const& state_param;
|
||||
typedef Data data;
|
||||
typedef Data& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr&, State&, Data> {
|
||||
public:
|
||||
typedef Expr expr;
|
||||
typedef Expr& expr_param;
|
||||
typedef State state;
|
||||
typedef State& state_param;
|
||||
typedef Data const data;
|
||||
typedef Data const& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr&, State, Data&> {
|
||||
public:
|
||||
typedef Expr expr;
|
||||
typedef Expr& expr_param;
|
||||
typedef State const state;
|
||||
typedef State const& state_param;
|
||||
typedef Data data;
|
||||
typedef Data& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr, State&, Data&> {
|
||||
public:
|
||||
typedef Expr const expr;
|
||||
typedef Expr const& expr_param;
|
||||
typedef State state;
|
||||
typedef State& state_param;
|
||||
typedef Data data;
|
||||
typedef Data& data_param;
|
||||
};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct transform_impl<Expr&, State&, Data&> {
|
||||
public:
|
||||
typedef Expr expr;
|
||||
typedef Expr& expr_param;
|
||||
typedef State state;
|
||||
typedef State& state_param;
|
||||
typedef Data data;
|
||||
typedef Data& data_param;
|
||||
};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TRANSFORM_IMPL_HPP
|
|
@ -1,128 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TRANSFORM_PASS_THROUGH_HPP
|
||||
#define SPROUT_BREED_TRANSFORM_PASS_THROUGH_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/index_tuple/metafunction.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/args.hpp>
|
||||
#include <sprout/breed/transform/impl.hpp>
|
||||
#include <sprout/breed/detail/std_result_of.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
namespace detail {
|
||||
template<
|
||||
typename Grammar,
|
||||
typename Expr,
|
||||
typename State,
|
||||
typename Data,
|
||||
long Arity = sprout::breed::arity_of<Expr>::value
|
||||
>
|
||||
struct pass_through_impl
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef typename pass_through_impl::expr unref_expr;
|
||||
private:
|
||||
template<typename IndexTuple>
|
||||
struct list_impl {};
|
||||
template<sprout::index_t... Indexes>
|
||||
struct list_impl<sprout::index_tuple<Indexes...> > {
|
||||
public:
|
||||
typedef sprout::breed::list<
|
||||
typename Grammar::template breed_child<Indexes>::type::template impl<
|
||||
typename sprout::breed::result_of::child_c<Expr, Indexes>::type,
|
||||
State,
|
||||
Data
|
||||
>::result_type...
|
||||
> type;
|
||||
};
|
||||
public:
|
||||
typedef typename sprout::breed::base_expr<
|
||||
typename unref_expr::breed_domain,
|
||||
typename unref_expr::breed_tag,
|
||||
typename list_impl<typename sprout::make_index_tuple<Arity>::type>::type
|
||||
>::type expr_type;
|
||||
typedef typename unref_expr::breed_generator breed_generator;
|
||||
typedef typename sprout::breed::detail::std_result_of<
|
||||
breed_generator(expr_type)
|
||||
>::type result_type;
|
||||
private:
|
||||
template<sprout::index_t... Indexes>
|
||||
SPROUT_CONSTEXPR result_type call_impl(
|
||||
typename pass_through_impl::expr_param e,
|
||||
typename pass_through_impl::state_param s,
|
||||
typename pass_through_impl::data_param d,
|
||||
sprout::index_tuple<Indexes...>
|
||||
) const
|
||||
{
|
||||
return breed_generator()(
|
||||
expr_type(
|
||||
typename Grammar::template breed_child<Indexes>::type::template impl<
|
||||
typename sprout::breed::result_of::child_c<Expr, Indexes>::type,
|
||||
State,
|
||||
Data
|
||||
>()(e.proto_base().template child<Indexes>(), s, d)...
|
||||
)
|
||||
);
|
||||
}
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(
|
||||
typename pass_through_impl::expr_param e,
|
||||
typename pass_through_impl::state_param s,
|
||||
typename pass_through_impl::data_param d
|
||||
) const
|
||||
{
|
||||
return call_impl(e, s, d, sprout::make_index_tuple<Arity>::make());
|
||||
}
|
||||
};
|
||||
template<typename Grammar, typename Expr, typename State, typename Data>
|
||||
struct pass_through_impl<Grammar, Expr, State, Data, 0>
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef Expr result_type;
|
||||
public:
|
||||
#ifdef SPROUT_BREED_STRICT_RESULT_OF
|
||||
SPROUT_CONSTEXPR result_type
|
||||
#else
|
||||
SPROUT_CONSTEXPR typename pass_through_impl::expr_param
|
||||
#endif
|
||||
operator()(
|
||||
typename pass_through_impl::expr_param e,
|
||||
typename pass_through_impl::state_param,
|
||||
typename pass_through_impl::data_param
|
||||
) const
|
||||
{
|
||||
return e;
|
||||
}
|
||||
};
|
||||
|
||||
} // namespace detail
|
||||
|
||||
//
|
||||
// pass_through
|
||||
//
|
||||
template<typename Grammar>
|
||||
struct pass_through
|
||||
: public sprout::breed::transform<sprout::breed::pass_through<Grammar> >
|
||||
{
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::detail::pass_through_impl<Grammar, Expr, State, Data>
|
||||
{};
|
||||
};
|
||||
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<typename Grammar>
|
||||
struct is_callable<sprout::breed::pass_through<Grammar> >
|
||||
: public std::true_type
|
||||
{};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TRANSFORM_PASS_THROUGH_HPP
|
|
@ -1,126 +0,0 @@
|
|||
#ifndef SPROUT_BREED_TRANSFORM_WHEN_HPP
|
||||
#define SPROUT_BREED_TRANSFORM_WHEN_HPP
|
||||
|
||||
#include <type_traits>
|
||||
#include <sprout/config.hpp>
|
||||
#include <sprout/type/type_tuple.hpp>
|
||||
#include <sprout/type/iterator/deref.hpp>
|
||||
#include <sprout/type/seq/algorithm/find_if.hpp>
|
||||
#include <sprout/breed/breed_fwd.hpp>
|
||||
#include <sprout/breed/traits.hpp>
|
||||
#include <sprout/breed/transform/call.hpp>
|
||||
#include <sprout/breed/transform/make.hpp>
|
||||
#include <sprout/breed/transform/impl.hpp>
|
||||
|
||||
namespace sprout {
|
||||
namespace breed {
|
||||
//
|
||||
// when
|
||||
//
|
||||
template<typename Grammar, typename PrimitiveTransform>
|
||||
struct when
|
||||
: public PrimitiveTransform
|
||||
{
|
||||
public:
|
||||
typedef Grammar first;
|
||||
typedef PrimitiveTransform second;
|
||||
typedef typename Grammar::breed_grammar breed_grammar;
|
||||
};
|
||||
template<typename Grammar, typename Fun>
|
||||
struct when<Grammar, Fun*>
|
||||
: public sprout::breed::when<Grammar, Fun>
|
||||
{};
|
||||
template<typename Grammar>
|
||||
struct when<Grammar, sprout::breed::external_transform>
|
||||
: public sprout::breed::transform<when<Grammar, sprout::breed::external_transform> >
|
||||
{
|
||||
public:
|
||||
typedef Grammar first;
|
||||
typedef external_transform second;
|
||||
typedef typename Grammar::breed_grammar breed_grammar;
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public Data::template when<Grammar>::template impl<Expr, State, Data>
|
||||
{};
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl<Expr, State, Data&>
|
||||
: public Data::template when<Grammar>::template impl<Expr, State, Data&>
|
||||
{};
|
||||
};
|
||||
template<typename Grammar, typename R, typename... Args>
|
||||
struct when<Grammar, R(Args...)>
|
||||
: public sprout::breed::transform<when<Grammar, R(Args...)> >
|
||||
{
|
||||
public:
|
||||
typedef Grammar first;
|
||||
typedef R second(Args...);
|
||||
typedef typename Grammar::breed_grammar breed_grammar;
|
||||
public:
|
||||
template<typename Expr, typename State, typename Data>
|
||||
struct impl
|
||||
: public sprout::breed::transform_impl<Expr, State, Data>
|
||||
{
|
||||
public:
|
||||
typedef typename std::conditional<
|
||||
sprout::breed::is_callable<R>::value,
|
||||
sprout::breed::call<R(Args...)>,
|
||||
sprout::breed::make<R(Args...)>
|
||||
>::type which;
|
||||
typedef typename which::template impl<Expr, State, Data>::result_type result_type;
|
||||
public:
|
||||
SPROUT_CONSTEXPR result_type operator()(
|
||||
typename impl::expr_param e,
|
||||
typename impl::state_param s,
|
||||
typename impl::data_param d
|
||||
) const
|
||||
{
|
||||
return typename which::template impl<Expr, State, Data>()(e, s, d);
|
||||
}
|
||||
};
|
||||
};
|
||||
//
|
||||
// is_callable
|
||||
//
|
||||
template<typename Grammar, typename Transform>
|
||||
struct is_callable<sprout::breed::when<Grammar, Transform> >
|
||||
: public std::true_type
|
||||
{};
|
||||
//
|
||||
// otherwise
|
||||
//
|
||||
template<typename Fun>
|
||||
struct otherwise
|
||||
: public sprout::breed::when<sprout::breed::_, Fun>
|
||||
{};
|
||||
//
|
||||
// external_transforms
|
||||
//
|
||||
template<typename... Args>
|
||||
struct external_transforms {
|
||||
public:
|
||||
typedef sprout::types::type_tuple<Args...> map_type;
|
||||
private:
|
||||
template<typename Rule>
|
||||
struct map_pred {
|
||||
public:
|
||||
template<typename T>
|
||||
struct apply
|
||||
: public std::is_same<Rule, typename T::first>
|
||||
{};
|
||||
};
|
||||
public:
|
||||
template<typename Rule>
|
||||
struct when
|
||||
: public sprout::breed::when<
|
||||
sprout::breed::_,
|
||||
sprout::types::deref<
|
||||
typename sprout::types::find_if<map_type, map_pred<Rule> >::type
|
||||
>::type
|
||||
>
|
||||
{};
|
||||
};
|
||||
} // namespace breed
|
||||
} // namespace sprout
|
||||
|
||||
#endif // #ifndef SPROUT_BREED_TRANSFORM_WHEN_HPP
|
Loading…
Reference in a new issue