add tcl+java example

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8140 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-12-30 11:59:54 +00:00
commit b4e4fe23ca
10 changed files with 144 additions and 13 deletions

View file

@ -26,8 +26,7 @@ SWIG_From(jstring)(jstring val)
{
if (!val) {
return Qnil;
}
else {
} else {
jint len = JvGetStringUTFLength(val);
char buf[len];
JvGetStringUTFRegion(val, 0, len, buf);