summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-07-18 15:05:18 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-07-18 15:05:18 (GMT)
commit81a1a91361cc615d3e9bf5b9016bd12cd258aa8d (patch)
tree97de78e38c2f1e7cd5411638a63eaca8ef6f2ab0 /tests
parent774c4023655381f0f5d722f19ae8bed785ebff58 (diff)
downloadtcl-81a1a91361cc615d3e9bf5b9016bd12cd258aa8d.zip
tcl-81a1a91361cc615d3e9bf5b9016bd12cd258aa8d.tar.gz
tcl-81a1a91361cc615d3e9bf5b9016bd12cd258aa8d.tar.bz2
[Bug 1c17fbba5d] Fix -errorinfo from syntax errors so that the error is
not obscured. Instead highlight it by making it the last character quoted.
Diffstat (limited to 'tests')
-rw-r--r--tests/assemble.test3
-rw-r--r--tests/misc.test7
2 files changed, 2 insertions, 8 deletions
diff --git a/tests/assemble.test b/tests/assemble.test
index 7d4e5d1..b0487e6 100644
--- a/tests/assemble.test
+++ b/tests/assemble.test
@@ -175,8 +175,7 @@ test assemble-4.1 {syntax error} {
-match glob
-result {1 {extra characters after close-brace} {extra characters after close-brace
while executing
-"{}extra
- "
+"{}e"
("assemble" body, line 2)*}}
}
test assemble-4.2 {null command} {
diff --git a/tests/misc.test b/tests/misc.test
index 6ddc718..d4ece74 100644
--- a/tests/misc.test
+++ b/tests/misc.test
@@ -59,12 +59,7 @@ test misc-1.2 {error in variable ref. in command in array reference} {
missing close-brace for variable name
missing close-brace for variable name
while executing
-"set tst $a([winfo name $\{zz)
- # this is a bogus comment
- # this is a bogus comment
- # this is a bogus comment
- # this is a bogus comment
- # this is a ..."
+"set tst $a([winfo name $\{"
(procedure "tstProc" line 4)
invoked from within
"tstProc"}]