Index: generic/nsfObjectData.c =================================================================== diff -u -rcbcfec72376d549a806859c873195cc0ebc9c9ea -r24571ae44c492c681d3efd2f2d2f5169ad7d6d57 --- generic/nsfObjectData.c (.../nsfObjectData.c) (revision cbcfec72376d549a806859c873195cc0ebc9c9ea) +++ generic/nsfObjectData.c (.../nsfObjectData.c) (revision 24571ae44c492c681d3efd2f2d2f5169ad7d6d57) @@ -60,7 +60,7 @@ NsfRequireClassOpt(cl); - if (!cl->opt->objectdata) { + if (cl->opt->objectdata == 0) { cl->opt->objectdata = (Tcl_HashTable*)ckalloc(sizeof(Tcl_HashTable)); Tcl_InitHashTable(cl->opt->objectdata, TCL_ONE_WORD_KEYS); } @@ -74,8 +74,8 @@ if (!cl->opt || !cl->opt->objectdata) return 0; hPtr = Tcl_FindHashEntry(cl->opt->objectdata, (char*)obj); - if (data) *data = hPtr ? Tcl_GetHashValue(hPtr) : 0; - return hPtr != 0; + if (data != NULL) *data = (hPtr != NULL) ? Tcl_GetHashValue(hPtr) : 0; + return hPtr != NULL; } EXTERN int @@ -85,8 +85,8 @@ if (!cl->opt || !cl->opt->objectdata) return 0; hPtr = Tcl_FindHashEntry(cl->opt->objectdata, (char*)obj); - if (hPtr) Tcl_DeleteHashEntry(hPtr); - return hPtr != 0; + if (hPtr != NULL) Tcl_DeleteHashEntry(hPtr); + return hPtr != NULL; } #endif