OLD | NEW |
| (Empty) |
1 # 2006 June 10 | |
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 # $Id: vtab_err.test,v 1.8 2007/09/03 16:12:10 drh Exp $ | |
13 | |
14 set testdir [file dirname $argv0] | |
15 source $testdir/tester.tcl | |
16 | |
17 ifcapable !vtab { | |
18 finish_test | |
19 return | |
20 } | |
21 | |
22 | |
23 | |
24 unset -nocomplain echo_module_begin_fail | |
25 do_ioerr_test vtab_err-1 -tclprep { | |
26 register_echo_module [sqlite3_connection_pointer db] | |
27 } -sqlbody { | |
28 BEGIN; | |
29 CREATE TABLE r(a PRIMARY KEY, b, c); | |
30 CREATE VIRTUAL TABLE e USING echo(r); | |
31 INSERT INTO e VALUES(1, 2, 3); | |
32 INSERT INTO e VALUES('a', 'b', 'c'); | |
33 UPDATE e SET c = 10; | |
34 DELETE FROM e WHERE a = 'a'; | |
35 COMMIT; | |
36 BEGIN; | |
37 CREATE TABLE r2(a, b, c); | |
38 INSERT INTO r2 SELECT * FROM e; | |
39 INSERT INTO e SELECT a||'x', b, c FROM r2; | |
40 COMMIT; | |
41 } | |
42 | |
43 ifcapable !memdebug { | |
44 puts "Skipping vtab_err-2 tests: not compiled with -DSQLITE_MEMDEBUG..." | |
45 finish_test | |
46 return | |
47 } | |
48 source $testdir/malloc_common.tcl | |
49 | |
50 | |
51 do_malloc_test vtab_err-2 -tclprep { | |
52 register_echo_module [sqlite3_connection_pointer db] | |
53 } -sqlbody { | |
54 BEGIN; | |
55 CREATE TABLE r(a PRIMARY KEY, b, c); | |
56 CREATE VIRTUAL TABLE e USING echo(r); | |
57 INSERT INTO e VALUES(1, 2, 3); | |
58 INSERT INTO e VALUES('a', 'b', 'c'); | |
59 UPDATE e SET c = 10; | |
60 DELETE FROM e WHERE a = 'a'; | |
61 COMMIT; | |
62 BEGIN; | |
63 CREATE TABLE r2(a, b, c); | |
64 INSERT INTO r2 SELECT * FROM e; | |
65 INSERT INTO e SELECT a||'x', b, c FROM r2; | |
66 COMMIT; | |
67 } | |
68 | |
69 sqlite3_memdebug_fail -1 | |
70 | |
71 finish_test | |
OLD | NEW |