165aa5f6d2
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8184 626c5289-ae23-0410-ae9c-e8d60b6d4f22
27 lines
539 B
OpenEdge ABL
27 lines
539 B
OpenEdge ABL
%include <typemaps/valtypes.swg>
|
|
|
|
%fragment(SWIG_AsVal_frag(jstring),"header") {
|
|
SWIGINTERN int
|
|
SWIG_AsVal_dec(jstring)(SV *obj, jstring *val)
|
|
{
|
|
return SWIG_ERROR;
|
|
}
|
|
}
|
|
|
|
%fragment(SWIG_From_frag(jstring),"header") {
|
|
SWIGINTERNINLINE SV *
|
|
SWIG_From_dec(jstring)(jstring val)
|
|
{
|
|
|
|
SV *obj = sv_newmortal();
|
|
return obj;
|
|
}
|
|
}
|
|
|
|
%typemaps_asvalfrom(%checkcode(STRING),
|
|
%arg(SWIG_AsVal(jstring)),
|
|
%arg(SWIG_From(jstring)),
|
|
%arg(SWIG_AsVal_frag(jstring)),
|
|
%arg(SWIG_From_frag(jstring)),
|
|
java::lang::String *);
|
|
|