mirror of https://github.com/swig/swig
82 lines
2.3 KiB
OpenEdge ABL
82 lines
2.3 KiB
OpenEdge ABL
|
|
// This test is to check the intermediary class name can be changed (C# and Java only use intermediary classes at time of writing)
|
|
%module(directors="1", jniclassname="intermediary_classname", imclassname="intermediary_classname") "intermediary_classname"
|
|
|
|
%warnfilter(SWIGWARN_TYPEMAP_THREAD_UNSAFE,SWIGWARN_TYPEMAP_DIRECTOROUT_PTR);
|
|
|
|
// throw is invalid in C++17 and later, only SWIG to use it
|
|
#define TESTCASE_THROW2(T1, T2) throw(T1, T2)
|
|
%{
|
|
#define TESTCASE_THROW2(T1, T2)
|
|
%}
|
|
|
|
// change the access to the intermediary class for testing purposes
|
|
%pragma(java) jniclassclassmodifiers="public class";
|
|
%pragma(csharp) imclassclassmodifiers="public class";
|
|
|
|
%feature("director") Base;
|
|
%feature("director") Derived;
|
|
|
|
// Test the throws attribute in these typemaps
|
|
%typemap(javadirectorout, throws="InstantiationException/*javadirectorout Base&*/") Base&
|
|
"$javaclassname.getCPtr($javacall)/* XYZ& typemap directorout*/"
|
|
%typemap(javadirectorin, throws="ClassNotFoundException/*javadirectorin Base&*/") Base&
|
|
"new $javaclassname($jniinput, false)/*javadirectorin*/"
|
|
%typemap(out, throws="IllegalAccessException/*out Base&*/") Base& {
|
|
// XYZ& typemap out
|
|
$result = 0; // remove unused variable warning
|
|
}
|
|
%inline %{
|
|
|
|
template<class T> T maximum(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;
|
|
}
|
|
void testconst(const T x) { }
|
|
};
|
|
|
|
class Base {
|
|
public:
|
|
Base() : mVectInt(0) {}
|
|
Base(Base *b) : mVectInt(0) {}
|
|
virtual ~Base() {}
|
|
virtual Base& m1(Base &b) { return b; }
|
|
virtual Base& m1out() { static Base b; return b; }
|
|
virtual Base* m2(Base *b) { return b; }
|
|
// virtual Base m3(Base b) { return b; }
|
|
vector<int> mVectInt;
|
|
int mInt;
|
|
enum en { en1, en2 };
|
|
en enummethod(en e) { return e; }
|
|
};
|
|
class Derived : public Base {
|
|
public:
|
|
Derived(Base *b) : Base(b) {}
|
|
virtual Base& m1(Base &b) { return b; }
|
|
virtual Base* m2(Base *b) { return b; }
|
|
// virtual Base m3(Base b) { return b; }
|
|
void throwspec() TESTCASE_THROW2(int, Base) {}
|
|
};
|
|
%}
|
|
|
|
%template(maxint) maximum<int>;
|
|
%template(maxdouble) maximum<double>;
|
|
%template(vecint) vector<int>;
|
|
%template(vecdouble) vector<double>;
|
|
%template(maxintp) maximum<int (*)[10]>;
|
|
%template(vecintp) vector<int (*)[10]>;
|
|
|
|
|