Index: generic/nsf.c =================================================================== diff -u -rbef777ff411770b97736e35a87cb23e23c7d7f83 -r5a560516f8b0b4388f892150b70e783e1d238310 --- generic/nsf.c (.../nsf.c) (revision bef777ff411770b97736e35a87cb23e23c7d7f83) +++ generic/nsf.c (.../nsf.c) (revision 5a560516f8b0b4388f892150b70e783e1d238310) @@ -12536,7 +12536,6 @@ switch (level) { case CALLING_LEVEL: NsfCallStackFindLastInvocation(interp, 1, &framePtr); break; case ACTIVE_LEVEL: NsfCallStackFindActiveFrame(interp, 1, &framePtr); break; - default: framePtr = NULL; } if (framePtr) { @@ -12546,7 +12545,6 @@ buffer[0] = '#'; Nsf_ltoa(buffer+1, (long)Tcl_CallFrame_level(framePtr), &l); - /*fprintf(stderr, "*** framePtr=%p buffer %s\n", framePtr, buffer);*/ resultObj = Tcl_NewStringObj(buffer, l+1); } else { /* If not called from an nsf frame, return 1 as default */