Overview
| Comment: | Fix for ticket #1167 (CVS 2405) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | d9aa0aa9ae2ca0dec976ba2ae4cd7047132be45b |
| User & Date: | drh 2005-03-20 23:18:58 |
Context
|
2005-03-21
| ||
| 00:28 | Fix a formatting error in the syntax documentation. Ticket #1145. (CVS 2406) check-in: 59892be6 user: drh tags: trunk | |
|
2005-03-20
| ||
| 23:18 | Fix for ticket #1167 (CVS 2405) check-in: d9aa0aa9 user: drh tags: trunk | |
| 22:54 | Do not attempt to read the journal file on windows because manditory locking on windows will not allow it. Ticket #1166. (CVS 2404) check-in: 1865e0d8 user: drh tags: trunk | |
Changes
Changes to test/bind.test.
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
...
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
|
# May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this script testing the sqlite_bind API. # # $Id: bind.test,v 1.30 2005/02/12 08:59:59 danielk1977 Exp $ # set testdir [file dirname $argv0] source $testdir/tester.tcl proc sqlite_step {stmt N VALS COLS} { upvar VALS vals ................................................................................ # Doubles do_test bind-4.1 { sqlite3_bind_double $VM 1 1234.1234 sqlite3_bind_double $VM 2 0.00001 sqlite3_bind_double $VM 3 123456789 sqlite_step $VM N VALUES COLNAMES sqlite3_reset $VM execsql {SELECT rowid, * FROM t1} } {1 1234.1234 1e-05 123456789.0} do_test bind-4.2 { execsql {SELECT typeof(a), typeof(b), typeof(c) FROM t1} } {real real real} do_test bind-4.3 { execsql { DELETE FROM t1; |
|
|
>
>
|
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
...
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
|
# May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this script testing the sqlite_bind API. # # $Id: bind.test,v 1.31 2005/03/20 23:18:58 drh Exp $ # set testdir [file dirname $argv0] source $testdir/tester.tcl proc sqlite_step {stmt N VALS COLS} { upvar VALS vals ................................................................................ # Doubles do_test bind-4.1 { sqlite3_bind_double $VM 1 1234.1234 sqlite3_bind_double $VM 2 0.00001 sqlite3_bind_double $VM 3 123456789 sqlite_step $VM N VALUES COLNAMES sqlite3_reset $VM set x [execsql {SELECT rowid, * FROM t1}] regsub {1e-005} $x {1e-05} y set y } {1 1234.1234 1e-05 123456789.0} do_test bind-4.2 { execsql {SELECT typeof(a), typeof(b), typeof(c) FROM t1} } {real real real} do_test bind-4.3 { execsql { DELETE FROM t1; |