summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-08-27 18:11:53 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-08-27 18:11:53 (GMT)
commit9150a7225d0e28174587948bb96b6a11f70493dc (patch)
tree9ce76aabc9ea3e790c3d8f852c0bf4ca3cf0c6e9
parent7ae8b6d7d1ea22f2499730faf3d1a16b8244015b (diff)
downloadtcl-9150a7225d0e28174587948bb96b6a11f70493dc.zip
tcl-9150a7225d0e28174587948bb96b6a11f70493dc.tar.gz
tcl-9150a7225d0e28174587948bb96b6a11f70493dc.tar.bz2
Add test for Bug 2486550.
-rw-r--r--tests/coroutine.test9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/coroutine.test b/tests/coroutine.test
index 8a7fdf3..03c63ad 100644
--- a/tests/coroutine.test
+++ b/tests/coroutine.test
@@ -633,6 +633,15 @@ test coroutine-7.6 {Early yield crashes} {
rename foo {}
} {}
+test coroutine-7.7 {Bug 2486550} -setup {
+ interp hide {} yield
+} -body {
+ coroutine demo interp invokehidden {} yield ok
+} -cleanup {
+ demo
+ interp expose {} yield
+} -result ok
+
# cleanup
unset lambda