return PL_sv_undef for empty strings, as in the old perl library

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7940 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-12-07 07:39:44 +00:00
commit 0a98e76136

View file

@ -53,7 +53,7 @@ SWIG_FromCharPtrAndSize(const char* carray, size_t size)
%delete_array(tmp);
}
} else {
sv_setpv(obj, "");
sv_setsv(obj, &PL_sv_undef);
}
return obj;
}