Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Increase the error tolerance when verifying the approximate size of a pseudo-random database in backup_ioerr.test. Otherwise the test could fail depending on the PRNG seed. (CVS 6488) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
deda5ab35e7663ba5f30c08b16ef3393 |
| User & Date: | danielk1977 2009-04-10 18:41:01 |
Context
|
2009-04-10
| ||
| 20:32 | Remove unused branches from the vdbeapi.c module. (CVS 6489) check-in: 7ae0fc7e user: drh tags: trunk | |
| 18:41 | Increase the error tolerance when verifying the approximate size of a pseudo-random database in backup_ioerr.test. Otherwise the test could fail depending on the PRNG seed. (CVS 6488) check-in: deda5ab3 user: danielk1977 tags: trunk | |
| 18:32 | Do not run io.test as part of the inmemory_journal permutation. io.test uses the tcl API to test for journal files in the file-system (which of course never exist when running with in-memory journals). (CVS 6487) check-in: 493f03bd user: danielk1977 tags: trunk | |
Changes
Changes to test/backup_ioerr.test.
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
..
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this file is testing the handling of IO errors by the # sqlite3_backup_XXX APIs. # # $Id: backup_ioerr.test,v 1.2 2009/02/04 22:46:47 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl proc data_checksum {db file} { $db one "SELECT md5sum(a, b) FROM ${file}.t1" } ................................................................................ if {$xtra_large} { execsql { INSERT INTO t1 SELECT a+64, randstr(1000,1000) FROM t1 } $db } } do_test backup_ioerr-1.1 { populate_database db set nPage [expr {[file size test.db] / 1024}] expr {$nPage>140 && $nPage<150} } {1} do_test backup_ioerr-1.2 { expr {[file size test.db] > $sqlite_pending_byte} } {1} do_test backup_ioerr-1.3 { db close file delete -force test.db |
|
|
|
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
..
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this file is testing the handling of IO errors by the # sqlite3_backup_XXX APIs. # # $Id: backup_ioerr.test,v 1.3 2009/04/10 18:41:01 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl proc data_checksum {db file} { $db one "SELECT md5sum(a, b) FROM ${file}.t1" } ................................................................................ if {$xtra_large} { execsql { INSERT INTO t1 SELECT a+64, randstr(1000,1000) FROM t1 } $db } } do_test backup_ioerr-1.1 { populate_database db set nPage [expr {[file size test.db] / 1024}] expr {$nPage>130 && $nPage<160} } {1} do_test backup_ioerr-1.2 { expr {[file size test.db] > $sqlite_pending_byte} } {1} do_test backup_ioerr-1.3 { db close file delete -force test.db |