2002-08-15 01:39:30 +00:00
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// The Loki Library
|
|
|
|
|
// Copyright (c) 2001 by Andrei Alexandrescu
|
|
|
|
|
// This code accompanies the book:
|
|
|
|
|
// Alexandrescu, Andrei. "Modern C++ Design: Generic Programming and Design
|
|
|
|
|
// Patterns Applied". Copyright (c) 2001. Addison-Wesley.
|
|
|
|
|
// Permission to use, copy, modify, distribute and sell this software for any
|
|
|
|
|
// purpose is hereby granted without fee, provided that the above copyright
|
|
|
|
|
// notice appear in all copies and that both that copyright notice and this
|
|
|
|
|
// permission notice appear in supporting documentation.
|
|
|
|
|
// The author or Addison-Welsey Longman make no representations about the
|
|
|
|
|
// suitability of this software for any purpose. It is provided "as is"
|
|
|
|
|
// without express or implied warranty.
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
2002-10-13 04:40:12 +00:00
|
|
|
// Last update: Oct 10, 2002
|
2002-08-15 01:39:30 +00:00
|
|
|
|
|
|
|
|
#ifndef FUNCTOR_INC_
|
|
|
|
|
#define FUNCTOR_INC_
|
|
|
|
|
|
|
|
|
|
#include "Typelist.h"
|
|
|
|
|
#include "EmptyType.h"
|
|
|
|
|
#include "SmallObj.h"
|
|
|
|
|
#include "TypeTraits.h"
|
|
|
|
|
#include <typeinfo>
|
|
|
|
|
#include <memory>
|
|
|
|
|
|
|
|
|
|
namespace Loki
|
|
|
|
|
{
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImpl (internal)
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
namespace Private
|
|
|
|
|
{
|
|
|
|
|
|
|
|
|
|
template <typename R, template <class> class ThreadingModel>
|
|
|
|
|
struct FunctorImplBase : public SmallObject<ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
|
|
|
|
|
typedef EmptyType Parm1;
|
|
|
|
|
typedef EmptyType Parm2;
|
|
|
|
|
typedef EmptyType Parm3;
|
|
|
|
|
typedef EmptyType Parm4;
|
|
|
|
|
typedef EmptyType Parm5;
|
|
|
|
|
typedef EmptyType Parm6;
|
|
|
|
|
typedef EmptyType Parm7;
|
|
|
|
|
typedef EmptyType Parm8;
|
|
|
|
|
typedef EmptyType Parm9;
|
|
|
|
|
typedef EmptyType Parm10;
|
|
|
|
|
typedef EmptyType Parm11;
|
|
|
|
|
typedef EmptyType Parm12;
|
|
|
|
|
typedef EmptyType Parm13;
|
|
|
|
|
typedef EmptyType Parm14;
|
|
|
|
|
typedef EmptyType Parm15;
|
|
|
|
|
|
|
|
|
|
virtual FunctorImplBase* DoClone() const = 0;
|
|
|
|
|
template <class U>
|
|
|
|
|
static U* Clone(U* pObj)
|
|
|
|
|
{
|
|
|
|
|
if (!pObj) return 0;
|
|
|
|
|
U* pClone = static_cast<U*>(pObj->DoClone());
|
2002-10-13 04:40:12 +00:00
|
|
|
//MSVC7: warning C4541: 'typeid' used on polymorphic type 'Loki::FunctorImpl<R,TList,ThreadingModel>' with /GR-; unpredictable behavior may result
|
|
|
|
|
//I rather RTTI wasn't a requirement
|
|
|
|
|
//TODOSGB find another way
|
|
|
|
|
//assert(typeid(*pClone) == typeid(*pObj));
|
2002-08-15 01:39:30 +00:00
|
|
|
return pClone;
|
|
|
|
|
}
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// macro DEFINE_CLONE_FUNCTORIMPL
|
|
|
|
|
// Implements the DoClone function for a functor implementation
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
#define DEFINE_CLONE_FUNCTORIMPL(Cls) \
|
|
|
|
|
virtual Cls* DoClone() const { return new Cls(*this); }
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Base template
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <unsigned int TListLength>
|
|
|
|
|
struct FunctorImplHelper;
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 0 (zero) parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<0>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
virtual R operator()() = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 1 parameter
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<1>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
virtual R operator()(Parm1) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 2 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<2>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
virtual R operator()(Parm1, Parm2) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 3 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<3>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 4 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<4>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 5 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<5>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 6 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<6>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 7 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<7>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 8 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<8>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 9 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<9>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 10 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<10>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 11 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<11>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 10>::Result P11;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
typedef typename TypeTraits<P11>::ParameterType Parm11;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10, Parm11) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 12 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<12>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 10>::Result P11;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 11>::Result P12;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
typedef typename TypeTraits<P11>::ParameterType Parm11;
|
|
|
|
|
typedef typename TypeTraits<P12>::ParameterType Parm12;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10, Parm11, Parm12) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 13 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<13>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 10>::Result P11;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 11>::Result P12;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 12>::Result P13;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
typedef typename TypeTraits<P11>::ParameterType Parm11;
|
|
|
|
|
typedef typename TypeTraits<P12>::ParameterType Parm12;
|
|
|
|
|
typedef typename TypeTraits<P13>::ParameterType Parm13;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10, Parm11, Parm12, Parm13) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 14 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<14>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 10>::Result P11;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 11>::Result P12;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 12>::Result P13;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 13>::Result P14;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
typedef typename TypeTraits<P11>::ParameterType Parm11;
|
|
|
|
|
typedef typename TypeTraits<P12>::ParameterType Parm12;
|
|
|
|
|
typedef typename TypeTraits<P13>::ParameterType Parm13;
|
|
|
|
|
typedef typename TypeTraits<P14>::ParameterType Parm14;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10, Parm11, Parm12, Parm13, Parm14) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImplHelper
|
|
|
|
|
// Specialization for 15 parameters
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
template <>
|
|
|
|
|
struct FunctorImplHelper<15>
|
|
|
|
|
{
|
|
|
|
|
template <typename R, class TList, template <class> class ThreadingModel>
|
|
|
|
|
class In : public Private::FunctorImplBase<R, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
typedef typename TL::TypeAt<TList, 0>::Result P1;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 1>::Result P2;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 2>::Result P3;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 3>::Result P4;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 4>::Result P5;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 5>::Result P6;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 6>::Result P7;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 7>::Result P8;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 8>::Result P9;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 9>::Result P10;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 10>::Result P11;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 11>::Result P12;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 12>::Result P13;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 13>::Result P14;
|
|
|
|
|
typedef typename TL::TypeAt<TList, 14>::Result P15;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef typename TypeTraits<P1>::ParameterType Parm1;
|
|
|
|
|
typedef typename TypeTraits<P2>::ParameterType Parm2;
|
|
|
|
|
typedef typename TypeTraits<P3>::ParameterType Parm3;
|
|
|
|
|
typedef typename TypeTraits<P4>::ParameterType Parm4;
|
|
|
|
|
typedef typename TypeTraits<P5>::ParameterType Parm5;
|
|
|
|
|
typedef typename TypeTraits<P6>::ParameterType Parm6;
|
|
|
|
|
typedef typename TypeTraits<P7>::ParameterType Parm7;
|
|
|
|
|
typedef typename TypeTraits<P8>::ParameterType Parm8;
|
|
|
|
|
typedef typename TypeTraits<P9>::ParameterType Parm9;
|
|
|
|
|
typedef typename TypeTraits<P10>::ParameterType Parm10;
|
|
|
|
|
typedef typename TypeTraits<P11>::ParameterType Parm11;
|
|
|
|
|
typedef typename TypeTraits<P12>::ParameterType Parm12;
|
|
|
|
|
typedef typename TypeTraits<P13>::ParameterType Parm13;
|
|
|
|
|
typedef typename TypeTraits<P14>::ParameterType Parm14;
|
|
|
|
|
typedef typename TypeTraits<P15>::ParameterType Parm15;
|
|
|
|
|
virtual R operator()(Parm1, Parm2, Parm3, Parm4, Parm5, Parm6, Parm7, Parm8, Parm9, Parm10, Parm11, Parm12, Parm13, Parm14, Parm15) = 0;
|
|
|
|
|
};
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
} // namespace Private
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorImpl
|
|
|
|
|
// The base class for a hierarchy of functors. The FunctorImpl class is not used
|
|
|
|
|
// directly; rather, the Functor class manages and forwards to a pointer to
|
|
|
|
|
// FunctorImpl
|
|
|
|
|
// You may want to derive your own functors from FunctorImpl.
|
|
|
|
|
// Specializations of FunctorImpl for up to 15 parameters follow
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template
|
|
|
|
|
<
|
|
|
|
|
typename R,
|
|
|
|
|
class TList,
|
|
|
|
|
template <class> class ThreadingModel = DEFAULT_THREADING
|
|
|
|
|
>
|
|
|
|
|
class FunctorImpl
|
|
|
|
|
: public Private::FunctorImplHelper
|
|
|
|
|
<
|
|
|
|
|
TL::Length<TList>::value
|
|
|
|
|
>
|
|
|
|
|
::template In<R, TList, ThreadingModel>
|
|
|
|
|
{
|
|
|
|
|
ASSERT_TYPELIST(TList);
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorHandler
|
|
|
|
|
// Wraps functors and pointers to functions
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <class ParentFunctor, typename Fun>
|
|
|
|
|
class FunctorHandler
|
|
|
|
|
: public ParentFunctor::Impl
|
|
|
|
|
{
|
|
|
|
|
typedef typename ParentFunctor::Impl Base;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef typename Base::ResultType ResultType;
|
|
|
|
|
typedef typename Base::Parm1 Parm1;
|
|
|
|
|
typedef typename Base::Parm2 Parm2;
|
|
|
|
|
typedef typename Base::Parm3 Parm3;
|
|
|
|
|
typedef typename Base::Parm4 Parm4;
|
|
|
|
|
typedef typename Base::Parm5 Parm5;
|
|
|
|
|
typedef typename Base::Parm6 Parm6;
|
|
|
|
|
typedef typename Base::Parm7 Parm7;
|
|
|
|
|
typedef typename Base::Parm8 Parm8;
|
|
|
|
|
typedef typename Base::Parm9 Parm9;
|
|
|
|
|
typedef typename Base::Parm10 Parm10;
|
|
|
|
|
typedef typename Base::Parm11 Parm11;
|
|
|
|
|
typedef typename Base::Parm12 Parm12;
|
|
|
|
|
typedef typename Base::Parm13 Parm13;
|
|
|
|
|
typedef typename Base::Parm14 Parm14;
|
|
|
|
|
typedef typename Base::Parm15 Parm15;
|
|
|
|
|
|
|
|
|
|
FunctorHandler(const Fun& fun) : f_(fun) {}
|
|
|
|
|
|
|
|
|
|
DEFINE_CLONE_FUNCTORIMPL(FunctorHandler)
|
|
|
|
|
|
|
|
|
|
// operator() implementations for up to 15 arguments
|
|
|
|
|
|
|
|
|
|
ResultType operator()()
|
|
|
|
|
{ return f_(); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1)
|
|
|
|
|
{ return f_(p1); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2)
|
|
|
|
|
{ return f_(p1, p2); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3)
|
|
|
|
|
{ return f_(p1, p2, p3); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4)
|
|
|
|
|
{ return f_(p1, p2, p3, p4); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13)
|
|
|
|
|
{ return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14)
|
|
|
|
|
{
|
|
|
|
|
return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14, Parm15 p15)
|
|
|
|
|
{
|
|
|
|
|
return f_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14, p15);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
private:
|
|
|
|
|
Fun f_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template FunctorHandler
|
|
|
|
|
// Wraps pointers to member functions
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <class ParentFunctor, typename PointerToObj,
|
|
|
|
|
typename PointerToMemFn>
|
|
|
|
|
class MemFunHandler : public ParentFunctor::Impl
|
|
|
|
|
{
|
|
|
|
|
typedef typename ParentFunctor::Impl Base;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef typename Base::ResultType ResultType;
|
|
|
|
|
typedef typename Base::Parm1 Parm1;
|
|
|
|
|
typedef typename Base::Parm2 Parm2;
|
|
|
|
|
typedef typename Base::Parm3 Parm3;
|
|
|
|
|
typedef typename Base::Parm4 Parm4;
|
|
|
|
|
typedef typename Base::Parm5 Parm5;
|
|
|
|
|
typedef typename Base::Parm6 Parm6;
|
|
|
|
|
typedef typename Base::Parm7 Parm7;
|
|
|
|
|
typedef typename Base::Parm8 Parm8;
|
|
|
|
|
typedef typename Base::Parm9 Parm9;
|
|
|
|
|
typedef typename Base::Parm10 Parm10;
|
|
|
|
|
typedef typename Base::Parm11 Parm11;
|
|
|
|
|
typedef typename Base::Parm12 Parm12;
|
|
|
|
|
typedef typename Base::Parm13 Parm13;
|
|
|
|
|
typedef typename Base::Parm14 Parm14;
|
|
|
|
|
typedef typename Base::Parm15 Parm15;
|
|
|
|
|
|
|
|
|
|
MemFunHandler(const PointerToObj& pObj, PointerToMemFn pMemFn)
|
|
|
|
|
: pObj_(pObj), pMemFn_(pMemFn)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
DEFINE_CLONE_FUNCTORIMPL(MemFunHandler)
|
|
|
|
|
|
|
|
|
|
ResultType operator()()
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10)
|
|
|
|
|
{ return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11)
|
|
|
|
|
{
|
|
|
|
|
return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10,
|
|
|
|
|
p11);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12)
|
|
|
|
|
{
|
|
|
|
|
return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10,
|
|
|
|
|
p11, p12);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13)
|
|
|
|
|
{
|
|
|
|
|
return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10,
|
|
|
|
|
p11, p12, p13);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14)
|
|
|
|
|
{
|
|
|
|
|
return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10,
|
|
|
|
|
p11, p12, p13, p14);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14, Parm15 p15)
|
|
|
|
|
{
|
|
|
|
|
return ((*pObj_).*pMemFn_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10,
|
|
|
|
|
p11, p12, p13, p14, p15);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
private:
|
|
|
|
|
PointerToObj pObj_;
|
|
|
|
|
PointerToMemFn pMemFn_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template Functor
|
|
|
|
|
// A generalized functor implementation with value semantics
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template<typename R, class TList = NullType,
|
|
|
|
|
template<class> class ThreadingModel = DEFAULT_THREADING>
|
|
|
|
|
class Functor
|
|
|
|
|
{
|
|
|
|
|
public:
|
|
|
|
|
// Handy type definitions for the body type
|
|
|
|
|
typedef FunctorImpl<R, TList, ThreadingModel> Impl;
|
|
|
|
|
typedef R ResultType;
|
|
|
|
|
typedef TList ParmList;
|
|
|
|
|
|
|
|
|
|
template<typename R1, class TList1>
|
|
|
|
|
struct RebindParmList
|
|
|
|
|
{
|
|
|
|
|
typedef Functor<R1, TList1, ThreadingModel> Result;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
typedef typename Impl::Parm1 Parm1;
|
|
|
|
|
typedef typename Impl::Parm2 Parm2;
|
|
|
|
|
typedef typename Impl::Parm3 Parm3;
|
|
|
|
|
typedef typename Impl::Parm4 Parm4;
|
|
|
|
|
typedef typename Impl::Parm5 Parm5;
|
|
|
|
|
typedef typename Impl::Parm6 Parm6;
|
|
|
|
|
typedef typename Impl::Parm7 Parm7;
|
|
|
|
|
typedef typename Impl::Parm8 Parm8;
|
|
|
|
|
typedef typename Impl::Parm9 Parm9;
|
|
|
|
|
typedef typename Impl::Parm10 Parm10;
|
|
|
|
|
typedef typename Impl::Parm11 Parm11;
|
|
|
|
|
typedef typename Impl::Parm12 Parm12;
|
|
|
|
|
typedef typename Impl::Parm13 Parm13;
|
|
|
|
|
typedef typename Impl::Parm14 Parm14;
|
|
|
|
|
typedef typename Impl::Parm15 Parm15;
|
|
|
|
|
|
|
|
|
|
// Member functions
|
|
|
|
|
|
|
|
|
|
Functor() : spImpl_()
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#if 0 // The Helper class will do those constructions because of VC7 bug
|
|
|
|
|
Functor(const Functor& rhs) : spImpl_(Impl::Clone(rhs.spImpl_.get()))
|
|
|
|
|
{}
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
Functor(std::auto_ptr<Impl> spImpl) : spImpl_(spImpl)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
template <typename Fun>
|
|
|
|
|
Functor(Fun fun)
|
|
|
|
|
: spImpl_(new FunctorHandler<Functor, Fun>(fun))
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
template <class PtrObj, typename MemFn>
|
|
|
|
|
Functor(const PtrObj& p, MemFn memFn)
|
|
|
|
|
: spImpl_(new MemFunHandler<Functor, PtrObj, MemFn>(p, memFn))
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
Functor& operator=(const Functor& rhs)
|
|
|
|
|
{
|
|
|
|
|
Functor copy(rhs);
|
|
|
|
|
// swap auto_ptrs by hand
|
|
|
|
|
Impl* p = spImpl_.spImpl_.release();
|
|
|
|
|
spImpl_.spImpl_.reset(copy.spImpl_.spImpl_.release());
|
|
|
|
|
copy.spImpl_.spImpl_.reset(p);
|
|
|
|
|
return *this;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()()
|
|
|
|
|
{ return (*spImpl_)(); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1)
|
|
|
|
|
{ return (*spImpl_)(p1); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2)
|
|
|
|
|
{ return (*spImpl_)(p1, p2); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11)
|
|
|
|
|
{ return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12)
|
|
|
|
|
{
|
|
|
|
|
return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11,
|
|
|
|
|
p12);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13)
|
|
|
|
|
{
|
|
|
|
|
return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11,
|
|
|
|
|
p12, p13);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14)
|
|
|
|
|
{
|
|
|
|
|
return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11,
|
|
|
|
|
p12, p13, p14);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14, Parm15 p15)
|
|
|
|
|
{
|
|
|
|
|
return (*spImpl_)(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11,
|
|
|
|
|
p12, p13, p14, p15);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
private:
|
|
|
|
|
|
|
|
|
|
// VC7 can't see the defined ctor when the template version in present
|
|
|
|
|
struct Helper
|
|
|
|
|
{
|
|
|
|
|
Helper()
|
|
|
|
|
: spImpl_(0)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
Helper(const Helper &rhs)
|
|
|
|
|
: spImpl_(Impl::Clone(rhs.spImpl_.get()))
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
explicit Helper(std::auto_ptr<Impl> spImpl)
|
|
|
|
|
: spImpl_(spImpl)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
template<typename U>
|
|
|
|
|
explicit Helper(U *ptr)
|
|
|
|
|
: spImpl_(ptr)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
Impl& operator*() const
|
|
|
|
|
{
|
|
|
|
|
return *spImpl_;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
std::auto_ptr<Impl> spImpl_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
Helper spImpl_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
namespace Private
|
|
|
|
|
{
|
|
|
|
|
template <class Fctor>
|
|
|
|
|
struct BinderFirstTraits
|
|
|
|
|
{
|
|
|
|
|
private:
|
|
|
|
|
typedef typename Fctor::ParmList TList;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef typename TL::Erase
|
|
|
|
|
<
|
|
|
|
|
TList,
|
|
|
|
|
typename TL::TypeAt<TList, 0>::Result
|
|
|
|
|
>
|
|
|
|
|
::Result ParmList;
|
|
|
|
|
|
|
|
|
|
//typedef typename TList::Tail ParmList;
|
|
|
|
|
|
|
|
|
|
typedef typename Fctor::template RebindParmList
|
|
|
|
|
<
|
|
|
|
|
typename Fctor::ResultType,
|
|
|
|
|
ParmList
|
|
|
|
|
>
|
|
|
|
|
::Result BoundFunctorType;
|
|
|
|
|
|
|
|
|
|
typedef typename BoundFunctorType::Impl Impl;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
} // namespace Private
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template BinderFirst
|
|
|
|
|
// Binds the first parameter of a Functor object to a specific value
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <class OriginalFunctor>
|
|
|
|
|
class BinderFirst
|
|
|
|
|
: public Private::BinderFirstTraits<OriginalFunctor>::Impl
|
|
|
|
|
{
|
|
|
|
|
typedef typename Private::BinderFirstTraits<OriginalFunctor>::Impl Base;
|
|
|
|
|
typedef typename OriginalFunctor::ResultType ResultType;
|
|
|
|
|
|
|
|
|
|
typedef typename OriginalFunctor::Parm1 BoundType;
|
|
|
|
|
|
|
|
|
|
typedef typename OriginalFunctor::Parm2 Parm1;
|
|
|
|
|
typedef typename OriginalFunctor::Parm3 Parm2;
|
|
|
|
|
typedef typename OriginalFunctor::Parm4 Parm3;
|
|
|
|
|
typedef typename OriginalFunctor::Parm5 Parm4;
|
|
|
|
|
typedef typename OriginalFunctor::Parm6 Parm5;
|
|
|
|
|
typedef typename OriginalFunctor::Parm7 Parm6;
|
|
|
|
|
typedef typename OriginalFunctor::Parm8 Parm7;
|
|
|
|
|
typedef typename OriginalFunctor::Parm9 Parm8;
|
|
|
|
|
typedef typename OriginalFunctor::Parm10 Parm9;
|
|
|
|
|
typedef typename OriginalFunctor::Parm11 Parm10;
|
|
|
|
|
typedef typename OriginalFunctor::Parm12 Parm11;
|
|
|
|
|
typedef typename OriginalFunctor::Parm13 Parm12;
|
|
|
|
|
typedef typename OriginalFunctor::Parm14 Parm13;
|
|
|
|
|
typedef typename OriginalFunctor::Parm15 Parm14;
|
|
|
|
|
typedef EmptyType Parm15;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
BinderFirst(const OriginalFunctor& fun, BoundType bound)
|
|
|
|
|
: f_(fun), b_(bound)
|
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
DEFINE_CLONE_FUNCTORIMPL(BinderFirst)
|
|
|
|
|
|
|
|
|
|
// operator() implementations for up to 15 arguments
|
|
|
|
|
|
|
|
|
|
ResultType operator()()
|
|
|
|
|
{ return f_(b_); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1)
|
|
|
|
|
{ return f_(b_, p1); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2)
|
|
|
|
|
{ return f_(b_, p1, p2); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3)
|
|
|
|
|
{ return f_(b_, p1, p2, p3); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13)
|
|
|
|
|
{ return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14)
|
|
|
|
|
{
|
|
|
|
|
return f_(b_, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// VC7 BUG
|
|
|
|
|
virtual ~BinderFirst() {}
|
|
|
|
|
private:
|
|
|
|
|
OriginalFunctor f_;
|
|
|
|
|
BoundType b_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// function template BindFirst
|
|
|
|
|
// Binds the first parameter of a Functor object to a specific value
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <class Fctor>
|
|
|
|
|
typename Private::BinderFirstTraits<Fctor>::BoundFunctorType
|
|
|
|
|
BindFirst
|
|
|
|
|
(
|
|
|
|
|
const Fctor& fun,
|
|
|
|
|
typename Fctor::Parm1 bound
|
|
|
|
|
){
|
|
|
|
|
typedef typename Private::BinderFirstTraits<Fctor>::BoundFunctorType
|
|
|
|
|
Outgoing;
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
|
// VC7 don't support the auto_ptr tricks
|
|
|
|
|
//
|
|
|
|
|
std::auto_ptr<typename Outgoing::Impl> apParam
|
|
|
|
|
(
|
|
|
|
|
new BinderFirst<Fctor>(fun, bound)
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
return Outgoing(apParam);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// class template Chainer
|
|
|
|
|
// Chains two functor calls one after another
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
template <typename Fun1, typename Fun2>
|
|
|
|
|
class Chainer : public Fun2::Impl
|
|
|
|
|
{
|
|
|
|
|
typedef Fun2 Base;
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
typedef typename Base::ResultType ResultType;
|
|
|
|
|
typedef typename Base::Parm1 Parm1;
|
|
|
|
|
typedef typename Base::Parm2 Parm2;
|
|
|
|
|
typedef typename Base::Parm3 Parm3;
|
|
|
|
|
typedef typename Base::Parm4 Parm4;
|
|
|
|
|
typedef typename Base::Parm5 Parm5;
|
|
|
|
|
typedef typename Base::Parm6 Parm6;
|
|
|
|
|
typedef typename Base::Parm7 Parm7;
|
|
|
|
|
typedef typename Base::Parm8 Parm8;
|
|
|
|
|
typedef typename Base::Parm9 Parm9;
|
|
|
|
|
typedef typename Base::Parm10 Parm10;
|
|
|
|
|
typedef typename Base::Parm11 Parm11;
|
|
|
|
|
typedef typename Base::Parm12 Parm12;
|
|
|
|
|
typedef typename Base::Parm13 Parm13;
|
|
|
|
|
typedef typename Base::Parm14 Parm14;
|
|
|
|
|
typedef typename Base::Parm15 Parm15;
|
|
|
|
|
|
|
|
|
|
Chainer(const Fun1& fun1, const Fun2& fun2) : f1_(fun1), f2_(fun2) {}
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
|
// VC7 don't see this implicit constructor
|
|
|
|
|
//
|
|
|
|
|
|
|
|
|
|
virtual ~Chainer() {}
|
|
|
|
|
|
|
|
|
|
DEFINE_CLONE_FUNCTORIMPL(Chainer)
|
|
|
|
|
|
|
|
|
|
// operator() implementations for up to 15 arguments
|
|
|
|
|
|
|
|
|
|
ResultType operator()()
|
|
|
|
|
{ return f1_(), f2_(); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1)
|
|
|
|
|
{ return f1_(p1), f2_(p1); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2)
|
|
|
|
|
{ return f1_(p1, p2), f2_(p1, p2); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3)
|
|
|
|
|
{ return f1_(p1, p2, p3), f2_(p1, p2, p3); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4)
|
|
|
|
|
{ return f1_(p1, p2, p3, p4), f2_(p1, p2, p3, p4); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5)
|
|
|
|
|
{ return f1_(p1, p2, p3, p4, p5), f2_(p1, p2, p3, p4, p5); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6)
|
|
|
|
|
{ return f1_(p1, p2, p3, p4, p5, p6), f2_(p1, p2, p3, p4, p5, p6); }
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ResultType operator()(Parm1 p1, Parm2 p2, Parm3 p3, Parm4 p4, Parm5 p5,
|
|
|
|
|
Parm6 p6, Parm7 p7, Parm8 p8, Parm9 p9, Parm10 p10, Parm11 p11,
|
|
|
|
|
Parm12 p12, Parm13 p13, Parm14 p14, Parm15 p15)
|
|
|
|
|
{
|
|
|
|
|
return f1_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14, p15),
|
|
|
|
|
f2_(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13,
|
|
|
|
|
p14, p15);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
private:
|
|
|
|
|
Fun1 f1_;
|
|
|
|
|
Fun2 f2_;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// function template Chain
|
|
|
|
|
// Chains two functor calls one after another
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
template <class Fun1, class Fun2>
|
|
|
|
|
Fun2 Chain(
|
|
|
|
|
const Fun1& fun1,
|
|
|
|
|
const Fun2& fun2)
|
|
|
|
|
{
|
|
|
|
|
//
|
|
|
|
|
// VC7 don't support the auto_ptr tricks
|
|
|
|
|
//
|
|
|
|
|
std::auto_ptr<typename Fun2::Impl> apParam
|
|
|
|
|
(
|
|
|
|
|
new Chainer<Fun1, Fun2>(fun1, fun2)
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
return Fun2(apParam);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
} // namespace Loki
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
// Change log:
|
|
|
|
|
// June 20, 2001: ported by Nick Thurn to gcc 2.95.3. Kudos, Nick!!!
|
|
|
|
|
// May 10, 2002: ported by Rani Sharoni to VC7 (RTM - 9466)
|
2002-10-13 04:40:12 +00:00
|
|
|
// Oct 10, 2002: removed rtti/polymorphic use of typeid
|
2002-08-15 01:39:30 +00:00
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
#endif // FUNCTOR_INC_
|
