jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix warning for unused var

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8516 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2006-01-22 07:15:35 +00:00
commit db67a26473
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
SWIG/Source/Modules/tcl8.cxx
View file

@ -521,7 +521,7 @@ public:
/* Emit overloading dispatch function */
int maxargs;
String *dispatch = Swig_overload_dispatch(n,"return %s(clientData, interp, objc, objv);",&maxargs);
String *dispatch = Swig_overload_dispatch(n,"return %s(clientData, interp, objc, argv - 1);",&maxargs);
/* Generate a dispatch wrapper for all overloaded functions */
@ -614,7 +614,7 @@ public:
Printf(setf->code,"name1o = Tcl_NewStringObj(name1,-1);\n");
Printf(setf->code,"value = Tcl_ObjGetVar2(interp, name1o, 0, flags);\n");
Printf(setf->code,"Tcl_DecrRefCount(name1o);\n");
Printf(setf->code,"if (!value) return NULL;\n");
Printf(setf->code,"if (!value) SWIG_fail;\n");
Printf(setf->code,"%s\n", tm);
Printf(setf->code,"return NULL;\n");
Printf(setf->code,"fail:\n");