This is a bug in Tcl Trunk.  I'll work on identifying the change that broke it and create a bug report for Tcl.