Import SQLite 3.10.2.

third_party/sqlite/src/test/wal.test

 # 2010 April 13
 #
 # The author disclaims copyright to this source code.  In place of
 # a legal notice, here is a blessing:
 #
 #    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.
 #
 #***********************************************************************
 # This file implements regression tests for SQLite library.  The
 # focus of this file is testing the operation of the library in
 # "PRAGMA journal_mode=WAL" mode.
 #
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 source $testdir/lock_common.tcl
 source $testdir/malloc_common.tcl
 source $testdir/wal_common.tcl
 
 set testprefix wal
 
 ifcapable !wal {finish_test ; return }
+test_set_config_pagecache 0 0
 
 proc reopen_db {} {
   catch { db close }
   forcedelete test.db test.db-wal test.db-wal-summary
   sqlite3_wal db test.db
 }
 
 set ::blobcnt 0
 proc blob {nByte} {
   incr ::blobcnt
@@ skipping 1545 matching lines @@
 foreach mode {OFF MEMORY PERSIST DELETE TRUNCATE WAL} {
   delete_file test.db test2.db
   sqlite3 db test.db
   do_test wal-25.$mode {
     db eval "PRAGMA journal_mode=$mode"
     db eval {ATTACH 'test2.db' AS t2; PRAGMA journal_mode=WAL;}
   } {wal}
   db close
 }
 
+test_restore_config_pagecache
 finish_test