diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2020-08-24 08:56:34 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2020-08-24 08:56:34 (GMT) |
commit | 1192757fb71a5f28fa60aa3e5c23ac851adabc3e (patch) | |
tree | 0ca14b136bcc8e42e9d414c2b185b3f70ffb9267 | |
parent | c76cad8a920e86cd3c255ed42e6f5b2bb727df1c (diff) | |
download | tcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.zip tcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.tar.gz tcl-1192757fb71a5f28fa60aa3e5c23ac851adabc3e.tar.bz2 |
Added two test cases
-rw-r--r-- | tests/expr.test | 11 |
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 |