diff options
author | dgp <dgp@users.sourceforge.net> | 2012-11-16 19:17:21 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2012-11-16 19:17:21 (GMT) |
commit | fd1f9d484eb12a94ef0005b475a12aa3429cfce5 (patch) | |
tree | b53fde11422fed477ec07ef2e2a982075c11b963 /tests/while-old.test | |
parent | b3a59469e023419e5a31fd41ed99714272b3819d (diff) | |
download | tcl-fd1f9d484eb12a94ef0005b475a12aa3429cfce5.zip tcl-fd1f9d484eb12a94ef0005b475a12aa3429cfce5.tar.gz tcl-fd1f9d484eb12a94ef0005b475a12aa3429cfce5.tar.bz2 |
Burn the octal bridges. We're not goin' back.
Diffstat (limited to 'tests/while-old.test')
-rw-r--r-- | tests/while-old.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/while-old.test b/tests/while-old.test index ee17d0b..e33bd0b 100644 --- a/tests/while-old.test +++ b/tests/while-old.test @@ -92,7 +92,7 @@ test while-old-4.3 {errors in while loops} { test while-old-4.4 {errors in while loops} { set err [catch {while {"a"+"b"} {error "loop aborted"}} msg] list $err $msg -} {1 {can't use non-numeric string as operand of "+"}} +} {1 {can't use non-numeric string "a" as operand of "+"}} test while-old-4.5 {errors in while loops} { catch {unset x} set x 1 |