Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Make sure the auxiliary database connection is closed after every test. (CVS 5428) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
e60bb6a179c6e674db2b9362e2ccdefa |
| User & Date: | drh 2008-07-16 18:35:46 |
Context
|
2008-07-16
| ||
| 19:30 | Get rid of the debug output, and make pre-C99 compilers happy with sqlite3_os_init() on OS/2. (CVS 5429) (check-in: 08fe49f6 user: pweilbacher tags: trunk) | |
| 18:35 | Make sure the auxiliary database connection is closed after every test. (CVS 5428) (check-in: e60bb6a1 user: drh tags: trunk) | |
| 18:20 | More improvements to the 64-bit integer conversion testing in func.test. (CVS 5427) (check-in: 632bb3c7 user: drh tags: trunk) | |
Changes
Changes to test/incrblob_err.test.
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
...
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
# # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # # $Id: incrblob_err.test,v 1.12 2008/07/08 17:43:57 danielk1977 Exp $ # set testdir [file dirname $argv0] source $testdir/tester.tcl ifcapable {!incrblob || !memdebug || !tclvar} { finish_test ................................................................................ # map page for the purposes of seeking to the end of the blob. # sqlite3 db2 test.db set ::blob [db2 incrblob blobs v 1] sqlite3_blob_read $::blob [expr 500*1020-20] 20 close $::blob } do_ioerr_test incrblob_err-8 -cksum 1 -sqlprep { PRAGMA auto_vacuum = 1; CREATE TABLE blobs(k INTEGER PRIMARY KEY, v BLOB); INSERT INTO blobs VALUES(1, zeroblob(500 * 1020)); } -tclbody { # Read some data from the end of the large blob inserted into table |
|
>
|
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
...
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
# # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # # $Id: incrblob_err.test,v 1.13 2008/07/16 18:35:46 drh Exp $ # set testdir [file dirname $argv0] source $testdir/tester.tcl ifcapable {!incrblob || !memdebug || !tclvar} { finish_test ................................................................................ # map page for the purposes of seeking to the end of the blob. # sqlite3 db2 test.db set ::blob [db2 incrblob blobs v 1] sqlite3_blob_read $::blob [expr 500*1020-20] 20 close $::blob } catch {db2 close} do_ioerr_test incrblob_err-8 -cksum 1 -sqlprep { PRAGMA auto_vacuum = 1; CREATE TABLE blobs(k INTEGER PRIMARY KEY, v BLOB); INSERT INTO blobs VALUES(1, zeroblob(500 * 1020)); } -tclbody { # Read some data from the end of the large blob inserted into table |