bltnsutil.patch 751 B

12345678910111213141516171819202122232425
  1. Description: Patch fixes call to Blt_ParseQualifiedName().
  2. Author: FreeBSD BLT maintainers
  3. Last-Modified: Tue, 08 Jul 2014 11:51:01 +0400
  4. --- a/generic/bltNsUtil.c
  5. +++ b/generic/bltNsUtil.c
  6. @@ -64,7 +64,7 @@
  7. Tcl_Var varPtr;
  8. Tcl_Namespace *nsPtr;
  9. Tcl_Obj *objPtr;
  10. - char *str, *cp;
  11. + CONST char *str, *cp;
  12. varPtr = Tcl_FindNamespaceVar(interp, (char *)name,
  13. (Tcl_Namespace *)NULL, 0);
  14. @@ -74,7 +74,7 @@
  15. objPtr = Tcl_NewObj();
  16. Tcl_GetVariableFullName(interp, varPtr, objPtr);
  17. str = Tcl_GetString(objPtr);
  18. - if (Blt_ParseQualifiedName(interp, str, &nsPtr, &cp) == NULL) {
  19. + if (Blt_ParseQualifiedName(interp, str, &nsPtr, &cp) != TCL_OK) {
  20. nsPtr = NULL;
  21. }
  22. Tcl_DecrRefCount(objPtr);