wasCSharpSQLite – Blame information for rev 1

Subversion Repositories:
Rev:
Rev Author Line No. Line
1 office 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