swig/SWIG/Examples/test-suite/template_tbase_template.i
Marcelo Matus ce680838a6 CHANGES.current
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@6269 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2004-09-26 01:14:49 +00:00

49 lines
1 KiB
OpenEdge ABL

%module template_tbase_template
%warnfilter(801) traits<Double, Double>; /* Ruby, wrong class name */
%warnfilter(320);
%inline %{
typedef double Double;
template <class ArgType, class ResType>
struct Function
{
char *test() { return (char *) "test"; }
};
template <class ArgType, class ResType>
struct traits
{
typedef ArgType arg_type;
typedef ResType res_type;
typedef Function<ArgType, double> base;
};
// Egad!
template <class AF, class AG>
struct Class
: Function<typename traits<AF, AG>::arg_type,
typename traits<AF, AG>::res_type>
{
};
template <class AF, class RF>
typename traits<AF, RF>::base
make_Class()
{
return Class<AF, RF>();
}
%}
%{
template class Function <Double, Double>;
template class Class <Double, Double>;
%}
%template(traits_dd) traits <Double, Double>;
%template(Function_dd) Function <Double, Double>;
%template(Class_dd) Class <Double, Double>;
%template(make_Class_dd) make_Class<Double,Double>;