Index: generic/xotclTrace.c =================================================================== diff -u -rd67e188b5b82e7159b894baf96bcfd2b3605918c -rb694e99c9c40f4b3c32a89977f2364958558513f --- generic/xotclTrace.c (.../xotclTrace.c) (revision d67e188b5b82e7159b894baf96bcfd2b3605918c) +++ generic/xotclTrace.c (.../xotclTrace.c) (revision b694e99c9c40f4b3c32a89977f2364958558513f) @@ -26,7 +26,7 @@ Tcl_Obj *cmdObj; XOTclNewObj(cmdObj); fprintf(stderr, "\tFrame=%p ", f); - if (f && f->isProcCallFrame && f->procPtr && f->procPtr->cmdPtr) { + if (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);