diff options
Diffstat (limited to 'tests/var.test')
-rw-r--r-- | tests/var.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/var.test b/tests/var.test index f90a4f2..c4ebe6e 100644 --- a/tests/var.test +++ b/tests/var.test @@ -13,7 +13,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: var.test,v 1.1.2.2 1998/09/24 23:59:39 stanton Exp $ +# RCS: @(#) $Id: var.test,v 1.1.2.3 1998/12/04 03:01:27 stanton Exp $ # if {[string compare test [info procs test]] == 1} then {source defs} @@ -453,7 +453,7 @@ test var-9.9 {behaviour of TclSetVar without TCL_LEAVE_ERR_MSG flag} { trace var v w readonly list [catch {testsetnoerr v 2} msg] $msg } {1 {before set}} - +} test var-10.1 {can't nest arrays with array set} { catch {unset arr} list [catch {array set arr(x) {a 1 b 2}} res] $res |