diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2020-11-01 14:25:49 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2020-11-01 14:25:49 (GMT) |
commit | b7efdfe9bc03114b633073ed9d4423e4f88582c5 (patch) | |
tree | def8a718bfc5e1ea62892acbdad2afda27b07a3b /tests/parse.test | |
parent | 63855497af431a6ee84d67b62ade8694485d76c9 (diff) | |
parent | 3b0ee42270085b039b75e2e27a3a145399a1bfac (diff) | |
download | tcl-b7efdfe9bc03114b633073ed9d4423e4f88582c5.zip tcl-b7efdfe9bc03114b633073ed9d4423e4f88582c5.tar.gz tcl-b7efdfe9bc03114b633073ed9d4423e4f88582c5.tar.bz2 |
Merge 8.7
Diffstat (limited to 'tests/parse.test')
-rw-r--r-- | tests/parse.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/parse.test b/tests/parse.test index 94c7f74..0786478 100644 --- a/tests/parse.test +++ b/tests/parse.test @@ -481,7 +481,7 @@ test parse-10.2 {Tcl_EvalTokens, backslash sequences} testevalex { testevalex {concat test\063\062test} } {test32test} test parse-10.3 {Tcl_EvalTokens, nested commands} testevalex { - testevalex {concat [expr 2 + 6]} + testevalex {concat [expr {2 + 6}]} } {8} test parse-10.4 {Tcl_EvalTokens, nested commands} testevalex { unset -nocomplain a @@ -499,7 +499,7 @@ test parse-10.6 {Tcl_EvalTokens, array variables} testevalex { test parse-10.7 {Tcl_EvalTokens, array variables} testevalex { unset -nocomplain a set a(12) 46 - testevalex {concat $a(1[expr 3 - 1])} + testevalex {concat $a(1[expr {3 - 1}])} } {46} test parse-10.8 {Tcl_EvalTokens, array variables} testevalex { unset -nocomplain a |