add empty (not working) jstring support
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8184 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
e484bb1721
commit
df7878b2dd
1 changed files with 27 additions and 0 deletions
27
SWIG/Lib/perl5/jstring.i
Normal file
27
SWIG/Lib/perl5/jstring.i
Normal file
|
|
@ -0,0 +1,27 @@
|
|||
%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 *);
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue