swig/Examples/test-suite/newobject2.i
Matthias Köppe bce63d09c8 Empty structs are not portable C.
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4199 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2002-12-13 17:24:21 +00:00

40 lines
632 B
OpenEdge ABL

/**
* The purpose of this test is to confirm that a language module
* correctly handles the case when a C function has been tagged with the
* %newobject directive.
*/
%module newobject2
%{
/* Global initialization (not wrapped) */
int g_fooCount = 0;
%}
%newobject makeFoo();
%inline %{
/* Struct definition */
typedef struct {
int dummy;
} Foo;
/* Make one */
Foo *makeFoo() {
Foo *foo = (Foo *) malloc(sizeof(Foo));
g_fooCount++;
return foo;
}
/* Return the number of instances */
int fooCount() {
return g_fooCount;
}
%}
%extend Foo {
~Foo() {
free((void *) self);
g_fooCount--;
}
}