Index: generic/xotclStack85.c =================================================================== diff -u -r485f041db31fc83046fbeba0d3e64beeb1abca1f -r044952af84b087821f5bd68570b84b8e3e000851 --- generic/xotclStack85.c (.../xotclStack85.c) (revision 485f041db31fc83046fbeba0d3e64beeb1abca1f) +++ generic/xotclStack85.c (.../xotclStack85.c) (revision 044952af84b087821f5bd68570b84b8e3e000851) @@ -326,7 +326,8 @@ XOTclObject *obj = csc->self; #if defined(TCL85STACK_TRACE) - fprintf(stderr, "POP csc=%p, obj %s\n", csc, objectName(obj)); + fprintf(stderr, "POP csc=%p, obj %s method %s (%d)\n", csc, objectName(obj), + Tcl_GetCommandName(interp, csc->cmdPtr)); #endif obj->activationCount --; /*fprintf(stderr, "decr activationCount for %s to %d\n", objectName(csc->self), csc->self->activationCount);*/