一、修正錯誤。
首先修正第二篇中的一些錯誤，錯誤的內容可見第二篇的評論。
在Base類中，FUNC_TYPE需要所有的in/out類型，如果Method的模板參數——即函數類型參數——的返回值不是void，則把它裝配成out參數，作為FUNC_TYPE函數類型的最后一個參數，這可以通過偏特化來實現。
修改Method模板類，把所有類型包裝成一個Typelist，直接傳遞給Base模板類，由Base去推導出in類型的Typelist。Method模板類修改如下：
template <class T>
struct Method
{
Loki::CompileTimeError <false> Only_Define_With_A_Function_Type;
};
template <class Ret>
struct Method <Ret()> : public Base < typename Loki::TL::MakeTypelist< out<Ret> >::Result >
{
};
template <>
struct Method <void()> : public Base < typename Loki::TL::MakeTypelist< >::Result >
{
};
template <class Ret, class A>
struct Method <Ret(A)> : public Base < typename Loki::TL::MakeTypelist< A, out<Ret> >::Result >
{
};
template <class A>
struct Method <void(A)> : public Base < typename Loki::TL::MakeTypelist< A >::Result >
{
};
template <class Ret, class A, class B>
struct Method <Ret(A,B)> : public Base < typename Loki::TL::MakeTypelist< A,B,out<Ret> >::Result >
{
};
template <class A, class B>
struct Method <void(A,B)> : public Base < typename Loki::TL::MakeTypelist< A,B >::Result >
{
};
template <class Ret, class A, class B, class C>
struct Method <Ret(A,B,C)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,out<Ret> >::Result >
{
};
template <class A, class B, class C>
struct Method <void(A,B,C)> : public Base < typename Loki::TL::MakeTypelist< A,B,C >::Result >
{
};
template <class Ret, class A, class B, class C, class D>
struct Method <Ret(A,B,C,D)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,D,out<Ret> >::Result >
{
};
template <class A, class B, class C, class D>
struct Method <void(A,B,C,D)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,D >::Result >
{
};
template <class Ret, class A, class B, class C, class D, class E>
struct Method <Ret(A,B,C,D,E)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,D,E,out<Ret> >::Result >
{
};
template <class A, class B, class C, class D, class E>
struct Method <void(A,B,C,D,E)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,D,E >::Result >
{
};
實現了1－5個參數的版本，一般情況下足夠用了，這里也只是用做解釋。
Base類的修改為：
template <class TYPES,
class IN_TYPES = typename InList <TYPES>::Result,
int IN_COUNT = Loki::TL::Length <IN_TYPES>::value
>
struct Base
{
Loki::CompileTimeError <false> Only_Use_Partial_Specialisation_Version;
};
InList模板類修改為接受一個Typelist模板參數，它的Result是這個Typelist中的所有in類型構成的Typelist。OutList暫時用不到，不過由于它和InList很相似，一并甩賣出來。
template < class T, int T_COUNT = Loki::TL::Length <T>::value >
struct InList
{
typedef typename If <
InOutTypeTraits <typename T::Head>::isin,
typename Loki::Typelist < typename T::Head, typename InList <typename T::Tail>::Result >,
typename InList <typename T::Tail>::Result
>::Result Result;
};
template <class T>
struct InList < T, 0 >
{
typedef typename Loki::TL::MakeTypelist <>::Result Result;
};
template < class T, int T_COUNT = Loki::TL::Length <T>::value >
struct OutList
{
typedef typename If <
InOutTypeTraits <typename T::Head>::isout,
typename Loki::Typelist < typename T::Head, typename OutList <typename T::Tail>::Result >,
typename OutList <typename T::Tail>::Result
>::Result Result;
};
template <class T>
struct OutList < T, 0 >
{
typedef typename Loki::TL::MakeTypelist <>::Result Result;
};
Base模板類中，需要根據TYPES模板參數推導出FUNC＿TYPE類型，TYPES是個Typelist，我使用了一個FuncTypeTraits模板類來生成這個類型。
template <class T, int T_COUNT = Loki::TL::Length <T>::value >
struct FuncTypeTraits
{
Loki::CompileTimeError <false> Only_Use_Partial_Specialisation_Version;
};
template <class T>
struct FuncTypeTraits <T, 0>
{
typedef void(*Result)();
};
template <class T>
struct FuncTypeTraits <T, 1>
{
typedef void(*Result)(
typename Loki::TL::TypeAt <T, 0>::Result::OriginalType);
};
template <class T>
struct FuncTypeTraits <T, 2>
{
typedef void(*Result)(
typename Loki::TL::TypeAt <T, 0>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 1>::Result::OriginalType);
};
template <class T>
struct FuncTypeTraits <T, 3>
{
typedef void(*Result)(
typename Loki::TL::TypeAt <T, 0>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 1>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 2>::Result::OriginalType);
};
template <class T>
struct FuncTypeTraits <T, 4>
{
typedef void(*Result)(
typename Loki::TL::TypeAt <T, 0>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 1>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 2>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 3>::Result::OriginalType);
};
template <class T>
struct FuncTypeTraits <T, 5>
{
typedef void(*Result)(
typename Loki::TL::TypeAt <T, 0>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 1>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 2>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 3>::Result::OriginalType,
typename Loki::TL::TypeAt <T, 4>::Result::OriginalType);
};
現在Base類所需要的信息都齊備了，下面是Base模板類的定義：
template <class TYPES,
class IN_TYPES = typename InList <TYPES>::Result,
int IN_COUNT = Loki::TL::Length <IN_TYPES>::value
>
struct Base
{
Loki::CompileTimeError <false> Only_Use_Partial_Specialisation_Version;
};
template <class TYPES, class IN_TYPES>
struct Base <TYPES, IN_TYPES, 0>
{
typedef typename FuncTypeTraits <TYPES>::Result FUNC_TYPE;
template <class FUNC_TYPE>
void async_call (FUNC_TYPE func = 0)
{
}
};
template <class TYPES, class IN_TYPES>
struct Base <TYPES, IN_TYPES, 1>
{
typedef typename FuncTypeTraits <TYPES>::Result FUNC_TYPE;
void async_call (
typename Loki::TL::TypeAt <IN_TYPES, 0>::Result::OriginalType v0,
FUNC_TYPE func = 0)
{
}
};
template <class TYPES, class IN_TYPES>
struct Base <TYPES, IN_TYPES, 2>
{
typedef typename FuncTypeTraits <TYPES>::Result FUNC_TYPE;
void async_call (
typename Loki::TL::TypeAt <IN_TYPES, 0>::Result::OriginalType v0,
typename Loki::TL::TypeAt <IN_TYPES, 1>::Result::OriginalType v1,
FUNC_TYPE func = 0)
{
}
};
template <class TYPES, class IN_TYPES>
struct Base <TYPES, IN_TYPES, 3>
{
typedef typename FuncTypeTraits <TYPES>::Result FUNC_TYPE;
void async_call (
typename Loki::TL::TypeAt <IN_TYPES, 0>::Result::OriginalType v0,
typename Loki::TL::TypeAt <IN_TYPES, 1>::Result::OriginalType v1,
typename Loki::TL::TypeAt <IN_TYPES, 2>::Result::OriginalType v2,
FUNC_TYPE func = 0)
{
}
};
template <class TYPES, class IN_TYPES>
struct Base <TYPES, IN_TYPES, 4>
{
typedef typename FuncTypeTraits <TYPES>::Result FUNC_TYPE;
void async_call (
typename Loki::TL::TypeAt <IN_TYPES, 0>::Result::OriginalType v0,
typename Loki::TL::TypeAt <IN_TYPES, 1>::Result::OriginalType v1,
typename Loki::TL::TypeAt <IN_TYPES, 2>::Result::OriginalType v2,
typename Loki::TL::TypeAt <IN_TYPES, 3>::Result::OriginalType v3,
FUNC_TYPE func = 0)
{
}
};
寫一點代碼來測試：
void test_func (int v0, char v1, string v2, short v3)
{
}
int main ()
{
Method < void(in<int>, in<char>, inout<string>, out<short>) > m;
m.async_call(3, 'a', "test");
m.async_call(3, 'a', "test", test_func);
return 0;
}
OK，函數原形推導就寫完了，以上代碼都已經在VC2005 Beta2中測試過，由于VC2005對于typename的要求不是很嚴格，所以可能在G＋＋下會有些問題，暫時沒有在G＋＋下測試。
接下來以上面的測試代碼為例來簡單說明一下。
定義一個Method < void < in<int>, in<char>, inout<string>, out<short> >類型的對象，它將從Base < typename MakeTypelist < in<int>, in<char>, inout<string>, out<short> >::Result >派生。
根據Base類的聲明，后2個模板參數將被推導出來，Method對象實際上是從Base < typename MakeTypelist < in<int>, in<char>, inout<string>, out<short> >::Result, typename MakeTypelist < in<int>, in<char>, inout<string> >::Result, 3>派生。
于是，Base類中的FUNC＿TYPE可通過FuncTypeTraits模板類推導，得到void (int, char, string, short)類型。
async_call函數的原型也推導出來：
void async_call (int, char, string, short, FUNC_TYPE = 0);
當然這里是簡單的演示，實際上async_call為了支持兼容類型，除最后一個函數指針參數以外，其它每個參數都是in或inout模板類型，
二、完善動態與靜態結構之間的耦合。解決了函數原形推導問題，不過忽略了另一個重要的問題。
Method的定義最終要生成一個動態結構，要能夠得到它的參數個數、各個參數的類型，這個在上一篇已經解決了。現在稍稍完整的部分寫下來：
struct IMethod
{
vector <IParameter*> parameters;
// 
其它操作省略
}; IMethod是Method動態實現的基礎，它里面包含各個參數的指針，in/out模板類從IParameter派生，相信從這個形式就能明白整個動態部分如何組織的，也就是實現一個簡單的自省。
in/inout/out這3個模板類實際是是從IParameter派生的，直接定義于Method模板類中：
template <class A, class B, class C, class D>
struct Method <void(A,B,C,D)> : public Base < typename Loki::TL::MakeTypelist< A,B,C,D >::Result >
{
A a;
B b;
C c;
D d;
Method (/* 參數暫不考慮 */)
{
parameters.push_baqck (&a);
parameters.push_baqck (&b);
parameters.push_baqck (&c);
parameters.push_baqck (&d);
}
}; 動態結構就完成了，各個偏特化版本都是這樣來實現。
上面說到出現了一個重要的新問題，在上面的測試代碼中，async_call函數接受3個參數（最后一個函數指針參數暫不考慮），而這里有4個變量，3個參數對應4個變量的位置只有到實例化的時候才能知道。
所以async_call還有另一個任務，就是把函數的參數值賦值給成員變量。
這個問題留到下一篇解決吧，這是最后一個問題了。