1 2set testdir [file dirname $argv0] 3source $testdir/tester.tcl 4 5set ::testprefix tkt-c48d99d690 6 7do_test 1.0 { 8 execsql { 9 CREATE TABLE t1(a, b); 10 CREATE TABLE t2(a, b); 11 INSERT INTO t1 VALUES('one' , 1); 12 INSERT INTO t1 VALUES('two' , 5); 13 INSERT INTO t1 VALUES('two' , 2); 14 INSERT INTO t1 VALUES('three', 3); 15 PRAGMA count_changes = 1; 16 } 17} {} 18 19do_test 1.1 { 20 execsql { INSERT INTO t2 SELECT * FROM t1 } 21} {4} 22 23do_test 1.2 { execsql VACUUM } {} 24 25finish_test 26