ed333b6b97
Go, Guile, Racket, Scilab: Add throws typemaps for std::string so that thrown string exception messages can be seen. Test all language for std::string throws typemaps
47 lines
1.2 KiB
OpenEdge ABL
47 lines
1.2 KiB
OpenEdge ABL
/*
|
|
* POINTER
|
|
*/
|
|
%fragment(SWIG_AsPtr_frag(std::string), "header", fragment="SWIG_SciString_AsCharPtrAndSize") {
|
|
SWIGINTERN int
|
|
SWIG_AsPtr_dec(std::string)(int iVar, std::string **pstValue) {
|
|
char* buf = 0;
|
|
size_t size = 0;
|
|
int alloc = SWIG_OLDOBJ;
|
|
|
|
if (SWIG_IsOK((SWIG_SciString_AsCharPtrAndSize(pvApiCtx, iVar, &buf, &size, &alloc, SWIG_Scilab_GetFuncName())))) {
|
|
if (buf) {
|
|
if (pstValue) {
|
|
*pstValue = new std::string(buf, size);
|
|
}
|
|
if (alloc == SWIG_NEWOBJ) {
|
|
delete[] buf;
|
|
}
|
|
return SWIG_NEWOBJ;
|
|
} else {
|
|
if (pstValue) {
|
|
*pstValue = NULL;
|
|
}
|
|
return SWIG_OLDOBJ;
|
|
}
|
|
} else {
|
|
return SWIG_ERROR;
|
|
}
|
|
}
|
|
}
|
|
|
|
%fragment(SWIG_From_frag(std::string), "header", fragment="SWIG_SciString_FromCharPtr") {
|
|
SWIGINTERN int
|
|
SWIG_From_dec(std::string)(std::string pstValue) {
|
|
return SWIG_SciString_FromCharPtr(pvApiCtx, SWIG_Scilab_GetOutputPosition(), pstValue.c_str());
|
|
}
|
|
}
|
|
|
|
%include <typemaps/std_string.swg>
|
|
|
|
%typemap(throws, noblock=1) std::string {
|
|
SWIG_Scilab_Raise_Ex($1.c_str(), "$type", $&descriptor);
|
|
}
|
|
|
|
%typemap(throws, noblock=1) const std::string & {
|
|
SWIG_Scilab_Raise_Ex($1.c_str(), "$type", $descriptor);
|
|
}
|