diff options
author | dgp <dgp@users.sourceforge.net> | 2013-12-05 20:45:45 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-12-05 20:45:45 (GMT) |
commit | 6c9f0c69b67589dd2c52c36bdd3fd3a7fb8e6f60 (patch) | |
tree | f8a3787901d28fa323de8d0144f92a5ec409afc7 /tests | |
parent | be6ed41db2f292c42a40c9e4da6bbc21884a3b54 (diff) | |
download | tcl-6c9f0c69b67589dd2c52c36bdd3fd3a7fb8e6f60.zip tcl-6c9f0c69b67589dd2c52c36bdd3fd3a7fb8e6f60.tar.gz tcl-6c9f0c69b67589dd2c52c36bdd3fd3a7fb8e6f60.tar.bz2 |
Draft fix for Bug 0b874c344d. Includes test.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/coroutine.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/coroutine.test b/tests/coroutine.test index 03c63ad..a360fd5 100644 --- a/tests/coroutine.test +++ b/tests/coroutine.test @@ -342,6 +342,9 @@ test coroutine-3.6 {info frame, bug #2910094} -setup { rename stack {} rename a {} } -result {} +test coroutine-3.7 {bug 0b874c344d} { + dict get [coroutine X coroutine Y info frame 0] cmd +} {coroutine X coroutine Y info frame 0} test coroutine-4.1 {bug #2093188} -setup { proc foo {} { |