Annotation of embedaddon/sqlite3/test/savepoint5.test, revision 1.1
1.1 ! misho 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:
! 18: set testdir [file dirname $argv0]
! 19: source $testdir/tester.tcl
! 20:
! 21: do_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}
! 30: do_test savepoint5-1.2 {
! 31: db eval {
! 32: ROLLBACK TO sp1;
! 33: SELECT count(*) FROM sqlite_master;
! 34: }
! 35: } {0}
! 36: do_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:
! 46: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>