Tcl Source Code

This code:
<pre>
namespace eval foo {
    proc bar {} {
        puts a
        yield OUT
        puts b
        yieldto ::return -level 0 123
        puts c
    }
}
puts [coroutine co foo::bar]
namespace delete foo
namespace eval foo {}
puts [co]
co
</pre>
Should print this:
<pre>
a
OUT
b
123
c
</pre>
But instead I get this:
<pre>
a
OUT
b
<span style="color:red">yieldto failed to find the proper namespace</span>
<span style="color:red">Abort trap: 6</span>
</pre>
The bytecoded version on the <a href="http://core.tcl.tk/tcl/info/ef8db24f85">dkf-bytecode-8.6 branch</a> works.