Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Fix some matching issues in enc4.test affected by TCL versions. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | experimental |
Files: | files | file ages | folders |
SHA1: |
dd6d61a967e3c0d98b78987f6f7bb9bd |
User & Date: | shaneh 2010-09-30 20:11:24.000 |
Context
2010-09-30
| ||
20:33 | Merge experimental into trunk: Refactor the text-to-numeric conversion routines to work without zero-terminators and in UTF16 as well as UTF8. Avoid invalidating strings with doing affinity conversions. (check-in: 07ee080ec4 user: drh tags: trunk) | |
20:11 | Fix some matching issues in enc4.test affected by TCL versions. (Closed-Leaf check-in: dd6d61a967 user: shaneh tags: experimental) | |
18:30 | Fix memory leak in enc4.test script. (check-in: bfc294ae43 user: shaneh tags: experimental) | |
Changes
Changes to test/enc4.test.
︙ | ︙ | |||
59 60 61 62 63 64 65 66 67 68 69 70 71 72 | sqlite3_expired $S } {0} set k 1 foreach val $vals { for {set x 1} {$x<18} {incr x} { set part [expr $init + [string range $val 0 [expr $x-1]]] do_test enc4-$i.$j.$k.3.$x { sqlite3_reset $S sqlite3_bind_text $S 1 $val $x sqlite3_step $S sqlite3_column_text $S 0 } [list $part] | > > | 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 | sqlite3_expired $S } {0} set k 1 foreach val $vals { for {set x 1} {$x<18} {incr x} { set part [expr $init + [string range $val 0 [expr $x-1]]] regsub {e\+0} $part {e+} part regsub {^1e} $part {1.0e} part do_test enc4-$i.$j.$k.3.$x { sqlite3_reset $S sqlite3_bind_text $S 1 $val $x sqlite3_step $S sqlite3_column_text $S 0 } [list $part] |
︙ | ︙ |