3 # The author disclaims copyright to this source code. In place of
4 # a legal notice, here is a blessing:
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.
10 #***********************************************************************
12 # This file verifies that an OP_Copy operation is used instead of OP_SCopy
13 # in a compound select in a case where the source register might be changed
14 # before the copy is used.
17 set testdir [file dirname $argv0]
18 source $testdir/tester.tcl
19 set testprefix selectF
23 CREATE TABLE t1(a, b, c);
24 INSERT INTO "t1" VALUES(1,'one','I');
25 CREATE TABLE t2(d, e, f);
26 INSERT INTO "t2" VALUES(5,'ten','XX');
27 INSERT INTO "t2" VALUES(6,NULL,NULL);
29 CREATE INDEX i1 ON t1(b, a);
36 # SELECT * FROM t1 WHERE a<5
43 SELECT * FROM t1 WHERE a<5
45 } {6 {} {} 1 one I 5 ten XX}