swig/Examples/test-suite/director_finalizer.i
Mark Rose 08e16bed8e four new director tests
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4449 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2003-03-07 10:30:11 +00:00

42 lines
504 B
OpenEdge ABL

%module(directors="1") director_finalizer
%{
int status = 0;
class Foo {
public:
virtual ~Foo() { orStatus(1); }
virtual void orStatus(int x) { status |= x; }
};
void deleteFoo(Foo *f) {
delete f;
}
Foo *launder(Foo *f) {
return f;
}
int getStatus() {
return status;
}
void resetStatus() {
status = 0;
}
%}
%feature("director") Foo;
class Foo {
public:
virtual ~Foo();
virtual void orStatus(int x);
};
void deleteFoo(Foo *f);
int getStatus();
Foo *launder(Foo *f);
void resetStatus();