Index: generic/nsfTrace.c =================================================================== diff -u -reea1c3907d9df65b1e1f80a0d19df35a5dc33d50 -rab5097b110d11556bd7b32faace2fd6cae23b6e5 --- generic/nsfTrace.c (.../nsfTrace.c) (revision eea1c3907d9df65b1e1f80a0d19df35a5dc33d50) +++ generic/nsfTrace.c (.../nsfTrace.c) (revision ab5097b110d11556bd7b32faace2fd6cae23b6e5) @@ -28,14 +28,14 @@ NsfNewObj(cmdObj); fprintf(stderr, "\tFrame=%p ", f); if (f && f->isProcCallFrame && f->procPtr && f->procPtr->cmdPtr) { - fprintf(stderr,"caller %p ",Tcl_CallFrame_callerPtr(f)); - fprintf(stderr,"callerV %p ",Tcl_CallFrame_callerVarPtr(f)); - Tcl_GetCommandFullName(interp, (Tcl_Command) f->procPtr->cmdPtr, cmdObj); + fprintf(stderr,"caller %p ", Tcl_CallFrame_callerPtr(f)); + fprintf(stderr,"callerV %p ", Tcl_CallFrame_callerVarPtr(f)); + Tcl_GetCommandFullName(interp, (Tcl_Command)f->procPtr->cmdPtr, cmdObj); fprintf(stderr, "%s (%p) lvl=%d\n", ObjStr(cmdObj), f->procPtr->cmdPtr, f->level); DECR_REF_COUNT(cmdObj); } else { if (f && f->varTablePtr) { - fprintf(stderr, "var_table = %p ",f->varTablePtr); + fprintf(stderr, "var_table = %p ", f->varTablePtr); } fprintf(stderr, "- \n"); } @@ -64,8 +64,8 @@ int j; fprintf(stderr, "%s", string); for (j = 0; j < objc; j++) { - /*fprintf(stderr, " objv[%d]=%s, ",j, objv[j] ? ObjStr(objv[j]) : "NULL");*/ - fprintf(stderr, " objv[%d]=%s %p, ",j, objv[j] ? ObjStr(objv[j]) : "NULL", objv[j]); + /*fprintf(stderr, " objv[%d]=%s, ", j, objv[j] ? ObjStr(objv[j]) : "NULL");*/ + fprintf(stderr, " objv[%d]=%s %p, ", j, objv[j] ? ObjStr(objv[j]) : "NULL", objv[j]); } fprintf(stderr, "\n"); } @@ -79,9 +79,9 @@ Tcl_HashEntry *hPtr; hPtr = Tcl_CreateHashEntry(table, id, &new); #ifdef NSF_MEM_TRACE - fprintf(stderr, "+++ alloc %s %p\n",id,p); + fprintf(stderr, "+++ alloc %s %p\n", id, p); #endif - /*fprintf(stderr,"+++alloc '%s'\n",id);*/ + /*fprintf(stderr,"+++alloc '%s'\n", id);*/ if (new) { entry = (NsfMemCounter*)ckalloc(sizeof(NsfMemCounter)); entry->count = 1; @@ -101,7 +101,7 @@ Tcl_HashTable *table = &nsfMemCount; Tcl_HashEntry *hPtr; #ifdef NSF_MEM_TRACE - fprintf(stderr, "+++ free %s %p\n",id,p); + fprintf(stderr, "+++ free %s %p\n", id, p); #endif hPtr = Tcl_FindHashEntry(table, id);