summaryrefslogtreecommitdiffstats
path: root/tests/info.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-04-04 13:40:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-04-04 13:40:01 (GMT)
commit749e8ceb5b9d6b1b59a8d16b578ec98017f01ad9 (patch)
treeeebeebaa58948935075500c432b9c53885fe1d6b /tests/info.test
parent99af240204182be4fa33b31c14a38233e2bc4249 (diff)
downloadtcl-749e8ceb5b9d6b1b59a8d16b578ec98017f01ad9.zip
tcl-749e8ceb5b9d6b1b59a8d16b578ec98017f01ad9.tar.gz
tcl-749e8ceb5b9d6b1b59a8d16b578ec98017f01ad9.tar.bz2
Better error-message in case of errors related to setting a variable
Diffstat (limited to 'tests/info.test')
-rw-r--r--tests/info.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/info.test b/tests/info.test
index 9977054..3323281 100644
--- a/tests/info.test
+++ b/tests/info.test
@@ -215,14 +215,14 @@ test info-6.9 {info default option} -returnCodes error -setup {
set a(0) 88
proc t1 {a b} {}
info default t1 a a
-} -returnCodes error -result {couldn't store default value in variable "a"}
+} -returnCodes error -result {can't set "a": variable is array}
test info-6.10 {info default option} -setup {
catch {unset a}
} -cleanup {unset a} -body {
set a(0) 88
proc t1 {{a 18} b} {}
info default t1 a a
-} -returnCodes error -result {couldn't store default value in variable "a"}
+} -returnCodes error -result {can't set "a": variable is array}
test info-6.11 {info default option} {
catch {namespace delete test_ns_info2}
namespace eval test_ns_info2 {
@@ -1826,7 +1826,7 @@ test info-30.46 {TIP 280 for compiled [subst]} {
} YES
test info-30.47 {TIP 280 for compiled [subst]} {
unset -nocomplain a
- set a(\n1831) YES; set a(\n1830) 1830; set a(\n1832) 1832
+ set a(\n1831) YES; set a(\n1830) 1830; set a(\n1832) 1832
subst {$a(
[dict get [info frame 0] line])} ; # 1831
} YES