1
0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00

Add code for a test that was failing before the persistent-wal related changes of [9ccc4a1be].

FossilOrigin-Name: 49d21ce50fcf535e470d284ccbb9eb4d4bcfa3a6
This commit is contained in:
dan
2011-12-16 17:01:04 +00:00
parent eed4250598
commit e98842f02d
3 changed files with 40 additions and 8 deletions

View File

@ -90,5 +90,37 @@ do_test walpersist-2.2 {
db close
concat [file exists test.db-wal] [file size test.db-wal]
} {1 0}
do_test walpersist-2.3 {
sqlite3 db test.db
execsql { PRAGMA integrity_check }
} {ok}
do_test 3.1 {
catch {db close}
forcedelete test.db test.db-shm test.db-wal
sqlite3 db test.db
execsql {
PRAGMA page_size = 1024;
PRAGMA journal_mode = WAL;
PRAGMA wal_autocheckpoint=128;
PRAGMA journal_size_limit=16384;
CREATE TABLE t1(a, b, PRIMARY KEY(a, b));
}
} {wal 128 16384}
do_test 3.2 {
for {set i 0} {$i<200} {incr i} {
execsql { INSERT INTO t1 VALUES(randomblob(500), randomblob(500)) }
}
file_control_persist_wal db 1
db close
} {}
do_test walpersist-3.3 {
file size test.db-wal
} {0}
do_test walpersist-3.4 {
sqlite3 db test.db
execsql { PRAGMA integrity_check }
} {ok}
finish_test