• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1# 2009 January 2
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# Verify that a SAVEPOINT on a new, empty database followed by a
13# ROLLBACK TO that savepoint starts over again with another new
14# empty database.
15#
16# $Id: savepoint5.test,v 1.1 2009/01/02 21:08:09 drh Exp $
17
18set testdir [file dirname $argv0]
19source $testdir/tester.tcl
20
21do_test savepoint5-1.1 {
22  db eval {
23    SAVEPOINT sp1;
24    CREATE TABLE t1(x);
25    INSERT INTO t1 VALUES(1);
26    SELECT count(*) FROM sqlite_master;
27    SELECT * FROM t1;
28  }
29} {1 1}
30do_test savepoint5-1.2 {
31  db eval {
32    ROLLBACK TO sp1;
33    SELECT count(*) FROM sqlite_master;
34  }
35} {0}
36do_test savepoint5-1.3 {
37  db eval {
38    CREATE TABLE t1(x);
39    INSERT INTO t1 VALUES(1);
40    SELECT count(*) FROM sqlite_master;
41    SELECT * FROM t1;
42  }
43} {1 1}
44
45
46finish_test
47