summaryrefslogtreecommitdiffstats
path: root/tests/dict.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-05-17 17:26:34 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-05-17 17:26:34 (GMT)
commit9c37cb89b43bf41494ec861b25260fc42c4349ce (patch)
treeee4effddf5b644872a5b9d6a19146045fc5a5736 /tests/dict.test
parent51d852e99981583fe62a25ea4e141238f7ed16c2 (diff)
parent6e977b903ee0e35f5b799abe1c8b3c902a5b5cef (diff)
downloadtcl-9c37cb89b43bf41494ec861b25260fc42c4349ce.zip
tcl-9c37cb89b43bf41494ec861b25260fc42c4349ce.tar.gz
tcl-9c37cb89b43bf41494ec861b25260fc42c4349ce.tar.bz2
merge trunk
Diffstat (limited to 'tests/dict.test')
-rw-r--r--tests/dict.test8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/dict.test b/tests/dict.test
index 5277cf6..77bacf6 100644
--- a/tests/dict.test
+++ b/tests/dict.test
@@ -1475,7 +1475,7 @@ proc linenumber {} {
dict get [info frame -1] line
}
test dict-23.1 {dict compilation crash: Bug 3487626} {
- apply {n {
+ apply {{} {apply {n {
set e {}
set k {}
dict for {a b} {c {d {e {f g}}}} {
@@ -1487,14 +1487,14 @@ test dict-23.1 {dict compilation crash: Bug 3487626} {
}
}
}
- }} [linenumber]
+ }} [linenumber]}}
} 5
test dict-23.2 {dict compilation crash: Bug 3487626} knownBug {
# Something isn't quite right in line number and continuation line
# tracking; at time of writing, this test produces 7, not 5, which
# indicates that the extra newlines in the non-script argument are
# confusing things.
- apply {n {
+ apply {{} {apply {n {
set e {}
set k {}
dict for {a {
@@ -1518,7 +1518,7 @@ j
}
}
}
- }} [linenumber]
+ }} [linenumber]}}
} 5
rename linenumber {}