Index: generic/nsfObj.c =================================================================== diff -u -r10f06c20b9fe60805fd945e7caa4133784fa62ad -r5ee4c3c7cdbf4620ffb4f9a7f69751f3c9647e2c --- generic/nsfObj.c (.../nsfObj.c) (revision 10f06c20b9fe60805fd945e7caa4133784fa62ad) +++ generic/nsfObj.c (.../nsfObj.c) (revision 5ee4c3c7cdbf4620ffb4f9a7f69751f3c9647e2c) @@ -102,6 +102,7 @@ /* * ... and free structure */ + /*fprintf(stderr, "MethodFreeInternalRep frees NsfMethodContext %p\n", (void *)mcPtr);*/ FREE(NsfMethodContext, mcPtr); objPtr->internalRep.twoPtrValue.ptr1 = NULL; objPtr->typePtr = NULL; @@ -130,7 +131,7 @@ #endif dstMcPtr = NEW(NsfMethodContext); - /*fprintf(stderr, "MethodDupInternalRep allocated NsfMethodContext %p for %s\n", dstMcPtr, ObjStr(srcObjPtr));*/ + /*fprintf(stderr, "MethodDupInternalRep allocated NsfMethodContext %p for %s\n", (void *)dstMcPtr, ObjStr(srcObjPtr));*/ memcpy(dstMcPtr, srcMcPtr, sizeof(NsfMethodContext)); dstObjPtr->typePtr = srcObjPtr->typePtr; @@ -177,7 +178,7 @@ #endif TclFreeInternalRep(objPtr); mcPtr = NEW(NsfMethodContext); - /*fprintf(stderr, "NsfMethodObjSet allocated NsfMethodContext %p for %s\n", mcPtr, ObjStr(objPtr));*/ + /*fprintf(stderr, "NsfMethodObjSet allocated NsfMethodContext %p for %s\n", (void *)mcPtr, ObjStr(objPtr));*/ objPtr->internalRep.twoPtrValue.ptr1 = (void *)mcPtr; objPtr->internalRep.twoPtrValue.ptr2 = NULL; objPtr->typePtr = objectType;