swig/Examples/test-suite/python/director_profile.i
Marcelo Matus d18d84cd3b add director profile test
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7853 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2005-11-21 20:28:18 +00:00

54 lines
579 B
OpenEdge ABL

%module(directors="1") director_profile
%feature("director") B;
%inline %{
class A {
public:
A() {}
};
class B
{
A aa;
public:
B() {}
virtual A fn(const A* a) {
return *a;
}
virtual int vfi(int a) {
return a + 1;
}
int fi(int a) {
return vfi(a);
}
int fj(const A* a) {
return 10;
}
B* fk(int i) {
return this;
}
const char* fl(int i) {
return "hello";
}
virtual ~B()
{
}
static B* get_self(B *b)
{
return b;
}
};
%}