Fixed type-checking problem.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@760 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2000-08-31 17:57:29 +00:00
commit ebaf68680a

View file

@ -33,6 +33,8 @@ SWIG_ConvertPtrFromString(Tcl_Interp *interp, char *c, void **ptr, _swig_type_in
if (*c != '_') {
*ptr = (void *) 0;
if (strcmp(c,"NULL") == 0) return TCL_OK;
Tcl_SetResult(interp,"Type error. Expected a pointer", TCL_STATIC);
return TCL_ERROR;
}
c++;
/* Extract hex value from pointer */