| OLD | NEW | 
|---|
| 1 # 2011 May 19 | 1 # 2011 May 19 | 
| 2 # | 2 # | 
| 3 # The author disclaims copyright to this source code.  In place of | 3 # The author disclaims copyright to this source code.  In place of | 
| 4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: | 
| 5 # | 5 # | 
| 6 #    May you do good and not evil. | 6 #    May you do good and not evil. | 
| 7 #    May you find forgiveness for yourself and forgive others. | 7 #    May you find forgiveness for yourself and forgive others. | 
| 8 #    May you share freely, never taking more than you give. | 8 #    May you share freely, never taking more than you give. | 
| 9 # | 9 # | 
| 10 #*********************************************************************** | 10 #*********************************************************************** | 
| 11 # This file implements regression tests for SQLite library. Specifically, | 11 # This file implements regression tests for SQLite library. Specifically, | 
| 12 # it tests that ticket [2d1a5c67dfc2363e44f29d9bbd57f7331851390a] has | 12 # it tests that ticket [2d1a5c67dfc2363e44f29d9bbd57f7331851390a] has | 
| 13 # been resolved. | 13 # been resolved. | 
| 14 # | 14 # | 
| 15 # | 15 # | 
| 16 # | 16 # | 
| 17 | 17 | 
| 18 set testdir [file dirname $argv0] | 18 set testdir [file dirname $argv0] | 
| 19 source $testdir/tester.tcl | 19 source $testdir/tester.tcl | 
| 20 set testprefix tkt-2d1a5c67d | 20 set testprefix tkt-2d1a5c67d | 
| 21 | 21 | 
| 22 ifcapable {!wal || !vtab} {finish_test; return} | 22 ifcapable {!vtab} {finish_test; return} | 
|  | 23 if {[wal_is_capable]==0} {finish_test; return} | 
| 23 | 24 | 
| 24 for {set ii 1} {$ii<=10} {incr ii} { | 25 for {set ii 1} {$ii<=10} {incr ii} { | 
| 25   do_test tkt-2d1a5c67d.1.$ii { | 26   do_test tkt-2d1a5c67d.1.$ii { | 
| 26     db close | 27     db close | 
| 27     forcedelete test.db test.db-wal | 28     forcedelete test.db test.db-wal | 
| 28     sqlite3 db test.db | 29     sqlite3 db test.db | 
| 29     db eval "PRAGMA cache_size=$::ii" | 30     db eval "PRAGMA cache_size=$::ii" | 
| 30     db eval { | 31     db eval { | 
| 31       PRAGMA journal_mode=WAL; | 32       PRAGMA journal_mode=WAL; | 
| 32       CREATE TABLE t1(a,b); | 33       CREATE TABLE t1(a,b); | 
| (...skipping 85 matching lines...) Expand 10 before | Expand all | Expand 10 after  Loading... | 
| 118 # | 119 # | 
| 119 forcedelete test.db2-wal test.db2 | 120 forcedelete test.db2-wal test.db2 | 
| 120 do_test 3.6 { | 121 do_test 3.6 { | 
| 121   copy_file test.db-wal test.db2-wal | 122   copy_file test.db-wal test.db2-wal | 
| 122   copy_file test.db test.db2 | 123   copy_file test.db test.db2 | 
| 123   sqlite3 db2 test.db2 | 124   sqlite3 db2 test.db2 | 
| 124   execsql { SELECT * FROM t4 WHERE a = 'xyz' } db2 | 125   execsql { SELECT * FROM t4 WHERE a = 'xyz' } db2 | 
| 125 } {xyz} | 126 } {xyz} | 
| 126 | 127 | 
| 127 finish_test | 128 finish_test | 
| OLD | NEW | 
|---|