swig/Examples/test-suite/template.i
Dave Beazley 12a43edc2d The great merge
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4141 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2002-11-30 22:01:28 +00:00

46 lines
1,011 B
OpenEdge ABL

/* File : example.i */
%module "template"
%warnfilter(801) vector<int>; /* Ruby, wrong class name */
%warnfilter(801) vector<double>; /* Ruby, wrong class name */
%warnfilter(801) vector<int (*)[10]>; /* Ruby, wrong class name */
/* Let's just grab the original header file here */
%inline %{
template<class T> T max(const T a, const T b) { return a>b ? a : b; }
template<class T> class vector {
T *v;
int sz;
public:
vector(int _sz) {
v = new T[_sz];
sz = _sz;
}
T &get(int index) {
return v[index];
}
void set(int index, T &val) {
v[index] = val;
}
// This really doesn't do anything except test const handling
void testconst(const T x) { }
};
%}
/* Now instantiate some specific template declarations */
%template(maxint) max<int>;
%template(maxdouble) max<double>;
%template(vecint) vector<int>;
%template(vecdouble) vector<double>;
/* Now try to break constness */
%template(maxintp) max<int (*)[10]>;
%template(vecintp) vector<int (*)[10]>;