Annotation of embedaddon/sqlite3/test/pager3.test, revision 1.1
1.1 ! misho 1: # 2010 June 15
! 2: #
! 3: # The author disclaims copyright to this source code. In place of
! 4: # a legal notice, here is a blessing:
! 5: #
! 6: # May you do good and not evil.
! 7: # May you find forgiveness for yourself and forgive others.
! 8: # May you share freely, never taking more than you give.
! 9: #
! 10: #***********************************************************************
! 11: #
! 12:
! 13: set testdir [file dirname $argv0]
! 14: source $testdir/tester.tcl
! 15: source $testdir/lock_common.tcl
! 16: source $testdir/malloc_common.tcl
! 17: source $testdir/wal_common.tcl
! 18:
! 19:
! 20: foreach {tn sql res j} {
! 21: 1 "PRAGMA journal_mode = DELETE" delete 0
! 22: 2 "CREATE TABLE t1(a, b)" {} 0
! 23: 3 "PRAGMA locking_mode=EXCLUSIVE" {exclusive} 0
! 24: 4 "INSERT INTO t1 VALUES(1, 2)" {} 1
! 25: 5 "PRAGMA locking_mode=NORMAL" {normal} 1
! 26: 6 "SELECT * FROM t1" {1 2} 0
! 27: } {
! 28: do_execsql_test pager3-1.$tn.1 $sql $res
! 29: do_test pager3-1.$tn.2 { file exists test.db-journal } $j
! 30: }
! 31:
! 32:
! 33: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>