Annotation of embedaddon/sqlite3/test/async5.test, revision 1.1.1.1
1.1 misho 1: # 2009 July 19
2: #
3: # May you do good and not evil.
4: # May you find forgiveness for yourself and forgive others.
5: # May you share freely, never taking more than you give.
6: #
7: #***********************************************************************
8: # This file tests that asynchronous IO is compatible with multi-file
9: # transactions.
10: #
11: # $Id: async5.test,v 1.1 2009/07/18 11:52:04 danielk1977 Exp $
12:
13: set testdir [file dirname $argv0]
14: source $testdir/tester.tcl
15:
16: if {[info commands sqlite3async_initialize] eq ""} {
17: # The async logic is not built into this system
18: finish_test
19: return
20: }
21:
22: db close
23: forcedelete test2.db
24: sqlite3async_initialize "" 1
25: sqlite3async_control halt never
26: sqlite3 db test.db
27:
28: do_test async5-1.1 {
29: execsql {
30: ATTACH 'test2.db' AS next;
31: CREATE TABLE main.t1(a, b);
32: CREATE TABLE next.t2(a, b);
33: BEGIN;
34: INSERT INTO t1 VALUES(1, 2);
35: INSERT INTO t2 VALUES(3, 4);
36: COMMIT;
37: }
38: } {}
39: do_test async5-1.2 {
40: execsql { SELECT * FROM t1 }
41: } {1 2}
42: do_test async5-1.3 {
43: execsql { SELECT * FROM t2 }
44: } {3 4}
45: do_test async5-1.4 {
46: execsql {
47: BEGIN;
48: INSERT INTO t1 VALUES('a', 'b');
49: INSERT INTO t2 VALUES('c', 'd');
50: COMMIT;
51: }
52: } {}
53: do_test async5-1.5 {
54: execsql { SELECT * FROM t1 }
55: } {1 2 a b}
56: do_test async5-1.6 {
57: execsql { SELECT * FROM t2 }
58: } {3 4 c d}
59:
60: db close
61:
62: sqlite3async_control halt idle
63: sqlite3async_start
64: sqlite3async_wait
65: sqlite3async_control halt never
66: sqlite3async_shutdown
67: set sqlite3async_trace 0
68: finish_test
69:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>