swig/Examples/test-suite/memberin_extend.i

44 lines
913 B
OpenEdge ABL

%module memberin_extend
// Tests memberin typemap is not used for %extend.
// The test extends the struct with a pseudo member variable
%inline %{
#include <string>
struct ExtendMe {
};
%}
// Use different names for the C backend to be consistent with the global prefix used.
%inline {
#ifdef SWIGC
%#define ADD_PREFIX(name) memberin_extend_ ## name
#else
%#define ADD_PREFIX(name) name
#endif
}
%{
#include <map>
#include <string.h>
std::map<ExtendMe*, char *> ExtendMeStringMap;
void ADD_PREFIX(ExtendMe_thing_set)(ExtendMe *self, const char *val) {
char *old_val = ExtendMeStringMap[self];
delete [] old_val;
if (val) {
ExtendMeStringMap[self] = new char[strlen(val)+1];
strcpy(ExtendMeStringMap[self], val);
} else {
ExtendMeStringMap[self] = 0;
}
}
char * ADD_PREFIX(ExtendMe_thing_get)(ExtendMe *self) {
return ExtendMeStringMap[self];
}
%}
%extend ExtendMe {
char *thing;
}