diff options
author | Steve Bennett <steveb@workware.net.au> | 2014-10-11 09:22:47 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2014-10-15 08:22:22 +1000 |
commit | dd69879b70a1fd4d9665e329f24d50327b21171d (patch) | |
tree | ef5f6f6b7339f831e7214b2ab82191a46e74f62a /tests | |
parent | 423eafffda751903ab5fb15e42aca7bd55c6d77b (diff) | |
download | jimtcl-dd69879b70a1fd4d9665e329f24d50327b21171d.zip jimtcl-dd69879b70a1fd4d9665e329f24d50327b21171d.tar.gz jimtcl-dd69879b70a1fd4d9665e329f24d50327b21171d.tar.bz2 |
Add more tcl compatiblity
- Add wide() function to [expr] (same as int())
- Small error message changes
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests')
-rw-r--r-- | tests/jim.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/jim.test b/tests/jim.test index c83a047..b48522d 100644 --- a/tests/jim.test +++ b/tests/jim.test @@ -812,7 +812,7 @@ test append-2.1 {long appends} { test append-3.1 {append errors} { list [catch {append} msg] $msg -} {1 {wrong # args: should be "append varName ?value value ...?"}} +} {1 {wrong # args: should be "append varName ?value ...?"}} test append-3.2 {append errors} { set x 1 list [catch {append x(0) 44} msg] $msg |