swig/Examples/java/native/example.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

52 lines
962 B
OpenEdge ABL

/* File : example.i */
%module example
%{
#include <string.h>
typedef struct point {
int x;
int y;
} Point;
Point *point_create(int x, int y) {
Point *p = (Point *) malloc(sizeof(Point));
p->x = x;
p->y = y;
return p;
}
/* this function will be wrapped by SWIG */
char *point_toString1(Point *p) {
static char buf[80];
sprintf(buf, "(%d,%d)", p->x, p->y);
return buf;
}
/* this one we wrapped manually*/
JNIEXPORT jstring JNICALL Java_exampleJNI_point_1toString2(JNIEnv *jenv, jclass jcls, jlong jpoint) {
Point * p;
char buf[80];
jstring result;
p = *(Point **)&jpoint;
sprintf(buf, "[%d,%d]", p->x, p->y);
result = (*jenv)->NewStringUTF(jenv, buf);
return result;
}
%}
Point *point_create(int x, int y);
char *point_toString1(Point *p);
/* give access to free() for memory cleanup of the malloc'd Point */
extern void free(void *memblock);
%native(point_toString2) char *point_toString2(Point *p);