mirror of https://github.com/swig/swig
44 lines
913 B
OpenEdge ABL
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;
|
|
}
|
|
|