tcl_protect_core 3391 ext/tk/tcltklib.c code = tcl_protect_core(interp, proc, data); tcl_protect_core 3396 ext/tk/tcltklib.c code = tcl_protect_core(interp, proc, data);