1 # 2005 September 17 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 # This file implements regression tests for SQLite library. Specifically. 12 # it contains tests to verify that ticket #2285 has been fixed. 13 # 14 # $Id: tkt2285.test,v 1.2 2008/07/12 14:52:20 drh Exp $ 15 16 set testdir [file dirname $argv0] 17 source $testdir/tester.tcl 18 19 ifcapable !tempdb { 20 finish_test 21 return 22 } 23 24 do_test tkt2285-1.1 { 25 execsql { 26 PRAGMA locking_mode = EXCLUSIVE; 27 } 28 execsql { 29 BEGIN; 30 CREATE TABLE abc(a, b, c); 31 ROLLBACK; 32 } 33 } {} 34 35 do_test tkt2285-1.2 { 36 execsql { 37 SELECT * FROM sqlite_master; 38 } 39 } {} 40 41 ifcapable tempdb { 42 do_test tkt2285-2.1 { 43 execsql { 44 BEGIN; 45 CREATE TEMP TABLE abc(a, b, c); 46 ROLLBACK; 47 } 48 } {} 49 do_test tkt2285-2.2 { 50 execsql { 51 SELECT * FROM sqlite_temp_master; 52 } 53 } {} 54 } 55 56 finish_test 57
