diff options
| author | Steve Bennett <steveb@workware.net.au> | 2012-03-02 16:42:46 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2012-08-07 15:09:45 +1000 |
| commit | b225e36dd50337cde65fd1acfb0fe11a69ffcb71 (patch) | |
| tree | c8401e007982b5864852bca8897394bc23c18991 /tests/lsort.test | |
| parent | 72a577998daa5edb99f6af1fc4820372e5563141 (diff) | |
| download | jimtcl-b225e36dd50337cde65fd1acfb0fe11a69ffcb71.zip jimtcl-b225e36dd50337cde65fd1acfb0fe11a69ffcb71.tar.gz jimtcl-b225e36dd50337cde65fd1acfb0fe11a69ffcb71.tar.bz2 | |
Remove octal literals with a leading 0 (TIP #114)
Now an octal literal needs to be explicitly indicated with a leading
0o or 0O, otherwise the number is treated as decimal.
This patch also adds support for binary literals.
e.g. 0b101 0B1101
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/lsort.test')
| -rw-r--r-- | tests/lsort.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/lsort.test b/tests/lsort.test index a01b14f..ad28b6e 100644 --- a/tests/lsort.test +++ b/tests/lsort.test @@ -145,7 +145,7 @@ test lsort-3.10 {SortCompare procedure, -integer option} { } {1 {expected integer but got "q"}} test lsort-3.11 {SortCompare procedure, -integer option} { lsort -integer {35 21 0x20 30 023 100 8} -} {8 023 21 30 0x20 35 100} +} {8 21 023 30 0x20 35 100} test lsort-3.15 {SortCompare procedure, -command option} { proc cmp {a b} { error "comparison error" @@ -172,7 +172,7 @@ test lsort-3.18 {SortCompare procedure, -command option} { } {48 36 35 22 21 18 6} test lsort-3.19 {SortCompare procedure, -decreasing option} { lsort -decreasing -integer {35 21 0x20 30 023 100 8} -} {100 35 0x20 30 21 023 8} +} {100 35 0x20 30 023 21 8} test lsort-4.26 {DefaultCompare procedure, signed characters} utf8 { set l [lsort [list "abc\u80" "abc"]] |