summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2020-08-24 08:56:34 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2020-08-24 08:56:34 (GMT)
commit1192757fb71a5f28fa60aa3e5c23ac851adabc3e (patch)
tree0ca14b136bcc8e42e9d414c2b185b3f70ffb9267
parentc76cad8a920e86cd3c255ed42e6f5b2bb727df1c (diff)
downloadtcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.zip
tcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.tar.gz
tcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.tar.bz2
Added two test cases
-rw-r--r--tests/expr.test11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/expr.test b/tests/expr.test
index ef00464..41d028b 100644
--- a/tests/expr.test
+++ b/tests/expr.test
@@ -7418,6 +7418,17 @@ test expr-62.4 {TIP 582: comments don't hide line breaks} -setup {
} -cleanup {
rename getline ""
} -result 5
+test expr-62.5 {TIP 582: comments don't splice tokens} {
+ set a False
+ expr {$a#don't splice
+ne#don't splice
+false}
+} 1
+test expr-62.6 {TIP 582: comments don't splice tokens} {
+ expr {0x2#don't splice
+ne#don't splice
+2}
+} 1
# cleanup
unset -nocomplain a