82 lines
2.2 KiB
C
82 lines
2.2 KiB
C
|
#ifndef _fadapter_h_
|
||
|
|
#define _fadapter_h_
|
||
|
|
|
||
|
|
#include <functional>
|
||
|
|
|
||
|
|
// used as adaptor's return/argument type,
|
||
|
|
// to allow binders/composers usage
|
||
|
|
struct __void_tag {};
|
||
|
|
|
||
|
|
# if !defined (STLPORT) || defined (__STL_USE_NAMESPACES)
|
||
|
|
using std::unary_function;
|
||
|
|
# endif
|
||
|
|
|
||
|
|
template <class Result>
|
||
|
|
class pointer_to_void_function {
|
||
|
|
protected:
|
||
|
|
Result (*ptr)();
|
||
|
|
public:
|
||
|
|
explicit pointer_to_void_function(Result (*x)()) : ptr(x) {}
|
||
|
|
Result operator()() const { return ptr(); }
|
||
|
|
Result operator()(__void_tag) const { return ptr(); }
|
||
|
|
};
|
||
|
|
|
||
|
|
// to feed composers
|
||
|
|
template <class Arg1>
|
||
|
|
struct projectvoid :
|
||
|
|
public unary_function<Arg1,__void_tag> {
|
||
|
|
__void_tag operator()(const Arg1& x) const { return __void_tag(); }
|
||
|
|
};
|
||
|
|
|
||
|
|
# if !defined (_STLP_MEMBER_POINTER_PARAM_BUG)
|
||
|
|
|
||
|
|
template <class Result>
|
||
|
|
pointer_to_void_function<Result> ptr_fun(Result (*x)()) {
|
||
|
|
return pointer_to_void_function<Result>(x);
|
||
|
|
}
|
||
|
|
|
||
|
|
// alternate name
|
||
|
|
template <class Result>
|
||
|
|
pointer_to_void_function<Result> ptr_gen(Result (*x)()) {
|
||
|
|
return pointer_to_void_function<Result>(x);
|
||
|
|
}
|
||
|
|
|
||
|
|
# endif /* !defined (__STL_MEMBER_POINTER_PARAM_BUG) */
|
||
|
|
|
||
|
|
|
||
|
|
template <class Arg>
|
||
|
|
class pointer_to_unary_procedure /* :public unary_function<Arg, __void_tag> */ {
|
||
|
|
protected:
|
||
|
|
typedef void (*fun_type)(Arg);
|
||
|
|
fun_type ptr;
|
||
|
|
public:
|
||
|
|
typedef Arg argument_type;
|
||
|
|
pointer_to_unary_procedure() {}
|
||
|
|
pointer_to_unary_procedure(fun_type x) : ptr(x) {}
|
||
|
|
void operator() (Arg x) const { ptr(x); }
|
||
|
|
};
|
||
|
|
template <class Arg>
|
||
|
|
inline pointer_to_unary_procedure<Arg> ptr_proc(void (*x)(Arg)) {
|
||
|
|
return pointer_to_unary_procedure<Arg>(x);
|
||
|
|
}
|
||
|
|
|
||
|
|
template <class Arg1, class Arg2>
|
||
|
|
class pointer_to_binary_procedure /* : public unary_function<Arg1, Arg2, __void_tag> */ {
|
||
|
|
protected:
|
||
|
|
typedef void (*fun_type)(Arg1, Arg2);
|
||
|
|
fun_type ptr;
|
||
|
|
public:
|
||
|
|
typedef Arg1 first_argument_type;
|
||
|
|
typedef Arg2 second_argument_type;
|
||
|
|
pointer_to_binary_procedure() {}
|
||
|
|
pointer_to_binary_procedure(fun_type x) : ptr(x) {}
|
||
|
|
void operator() (Arg1 x, Arg2 y) const { ptr(x, y); }
|
||
|
|
};
|
||
|
|
template <class Arg1, class Arg2>
|
||
|
|
inline pointer_to_binary_procedure<Arg1, Arg2> ptr_proc(void (*x)(Arg1, Arg2)) {
|
||
|
|
return pointer_to_binary_procedure<Arg1, Arg2>(x);
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|