AryaWu/sqlite

1# 2005 September 172#3# The author disclaims copyright to this source code.  In place of4# 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 16set testdir [file dirname $argv0]17source $testdir/tester.tcl18 19ifcapable !tempdb {20  finish_test21  return22}23 24do_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 35do_test tkt2285-1.2 {36  execsql {37    SELECT * FROM sqlite_master;38  }39} {}40 41ifcapable 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 56finish_test57