summaryrefslogtreecommitdiffstats
path: root/tests/ioTrans.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-05 20:45:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-05 20:45:04 (GMT)
commit66dd14a48053da5e5f4463d0d83b9e5480a9bd5e (patch)
treefdfb7d34ece5a2cbf6649301b15d2783356ff128 /tests/ioTrans.test
parentf2963d15d036e305300773f74a602c9c0a8c9229 (diff)
downloadtcl-66dd14a48053da5e5f4463d0d83b9e5480a9bd5e.zip
tcl-66dd14a48053da5e5f4463d0d83b9e5480a9bd5e.tar.gz
tcl-66dd14a48053da5e5f4463d0d83b9e5480a9bd5e.tar.bz2
TIP #581: Last possible master/slave -> parent/child changes, without affecting anything serious
Diffstat (limited to 'tests/ioTrans.test')
-rw-r--r--tests/ioTrans.test16
1 files changed, 8 insertions, 8 deletions
diff --git a/tests/ioTrans.test b/tests/ioTrans.test
index 2872fbb..f185117 100644
--- a/tests/ioTrans.test
+++ b/tests/ioTrans.test
@@ -1244,16 +1244,16 @@ test iortrans-11.1 {origin interpreter of moved transform destroyed during acces
tempdone
} -result {Owner lost}
test iortrans-11.2 {delete interp of reflected transform} -setup {
- interp create slave
- # Magic to get the test* commands into the slave
- load {} Tcltest slave
+ interp create child
+ # Magic to get the test* commands into the child
+ load {} Tcltest child
} -constraints {testchannel} -body {
- # Get base channel into the slave
+ # Get base channel into the child
set c [tempchan]
testchannel cut $c
- interp eval slave [list testchannel splice $c]
- interp eval slave [list set c $c]
- slave eval {
+ interp eval child [list testchannel splice $c]
+ interp eval child [list set c $c]
+ child eval {
proc no-op args {}
proc driver {c sub args} {
return {initialize finalize read write}
@@ -1261,7 +1261,7 @@ test iortrans-11.2 {delete interp of reflected transform} -setup {
set t [chan push $c [list driver $c]]
chan event $c readable no-op
}
- interp delete slave
+ interp delete child
} -cleanup {
tempdone
} -result {}