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

fix seterrormsg as reported by Colin McDonald

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8853 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2006-02-20 17:42:54 +00:00
commit 50c10593e6
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Lib/tcl/tclerrors.swg
View file

@ -59,9 +59,12 @@ SWIG_Tcl_SetErrorMsg(Tcl_Interp *interp, const char *ctype, const char *mesg)
{ {
Tcl_ResetResult(interp); Tcl_ResetResult(interp);
Tcl_SetErrorCode(interp, "SWIG", ctype, NULL); Tcl_SetErrorCode(interp, "SWIG", ctype, NULL);
Tcl_AppendResult(interp, ctype, " ", mesg, NULL);
/*
Tcl_AddErrorInfo(interp, ctype); Tcl_AddErrorInfo(interp, ctype);
Tcl_AddErrorInfo(interp, " "); Tcl_AddErrorInfo(interp, " ");
Tcl_AddErrorInfo(interp, mesg); Tcl_AddErrorInfo(interp, mesg);
*/
} }
SWIGINTERNINLINE void SWIGINTERNINLINE void