Tcl Source Code

Artifact f019dd34e3735a2afbe1bb7813b7b01f4e223830:

Attachment "traceexec.tcl" to ticket [3059758fff] added by ferrieux 2010-09-20 03:54:39.

---

proc A x {
    B x x
}
proc B {x y} {
    return -code error Yo
}
puts =====================A\n[::tcl::unsupported::disassemble proc A]
set ::tcl_traceExec 3
A 1