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