fix seterrormsg as reported by Colin McDonald

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

View file

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