7 May
2008
7 May
'08
10:18 p.m.
Someone asked on chat why the unknown stuff (e.g., typing an unknown command name into the console) in tkcon "broke" after doing:
package require xotcl::upvar-compat
I looked at the code there, and the uplevel redef isn't actually compatible because it ignores error codes. Instead of:
::xotcl::tcl_uplevel 1 \ [list eval ::xotcl::tcl_uplevel $lvl $args]
you need something like:
set code [catch {::xotcl::tcl_uplevel 1 \ [list eval ::xotcl::tcl_uplevel $lvl $args]} msg] return -code $code $msg
Just an FYI for anyone using it. I'm not sure what effect this would have, if any, on the xotcl use case.
Regards,
Jeff