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 #***********************************************************************
11 # This file implements regression tests for SQLite library.
13 # This file implements tests to verify that ticket [9a8b09f8e6] has been
17 set testdir [file dirname $argv0]
18 source $testdir/tester.tcl
19 set testprefix tkt-9a8b09f8e6
23 CREATE TABLE t1(x TEXT);
24 INSERT INTO t1 VALUES('1');
30 CREATE TABLE t2(x INTEGER);
31 INSERT INTO t2 VALUES(1);
37 CREATE TABLE t3(x REAL);
38 INSERT INTO t3 VALUES(1.0);
44 CREATE TABLE t4(x REAL);
45 INSERT INTO t4 VALUES(1.11);
51 CREATE TABLE t5(x, y);
52 INSERT INTO t5 VALUES('1', 'one');
53 INSERT INTO t5 VALUES(1, 'two');
54 INSERT INTO t5 VALUES('1.0', 'three');
55 INSERT INTO t5 VALUES(1.0, 'four');
61 SELECT x FROM t1 WHERE x IN (1);
67 SELECT x FROM t1 WHERE x IN (1.0);
73 SELECT x FROM t1 WHERE x IN ('1');
79 SELECT x FROM t1 WHERE x IN ('1.0');
85 SELECT x FROM t1 WHERE 1 IN (x);
91 SELECT x FROM t1 WHERE 1.0 IN (x);
97 SELECT x FROM t1 WHERE '1' IN (x);
103 SELECT x FROM t1 WHERE '1.0' IN (x);
109 SELECT x FROM t2 WHERE x IN (1);
115 SELECT x FROM t2 WHERE x IN (1.0);
121 SELECT x FROM t2 WHERE x IN ('1');
127 SELECT x FROM t2 WHERE x IN ('1.0');
133 SELECT x FROM t2 WHERE 1 IN (x);
139 SELECT x FROM t2 WHERE 1.0 IN (x);
145 SELECT x FROM t2 WHERE '1' IN (x);
151 SELECT x FROM t2 WHERE '1.0' IN (x);
157 SELECT x FROM t3 WHERE x IN (1);
163 SELECT x FROM t3 WHERE x IN (1.0);
169 SELECT x FROM t3 WHERE x IN ('1');
175 SELECT x FROM t3 WHERE x IN ('1.0');
181 SELECT x FROM t3 WHERE 1 IN (x);
187 SELECT x FROM t3 WHERE 1.0 IN (x);
193 SELECT x FROM t3 WHERE '1' IN (x);
199 SELECT x FROM t3 WHERE '1.0' IN (x);
205 SELECT x FROM t4 WHERE x IN (1);
211 SELECT x FROM t4 WHERE x IN (1.0);
217 SELECT x FROM t4 WHERE x IN ('1');
223 SELECT x FROM t4 WHERE x IN ('1.0');
229 SELECT x FROM t4 WHERE x IN (1.11);
235 SELECT x FROM t4 WHERE x IN ('1.11');
241 SELECT x FROM t4 WHERE 1 IN (x);
247 SELECT x FROM t4 WHERE 1.0 IN (x);
253 SELECT x FROM t4 WHERE '1' IN (x);
259 SELECT x FROM t4 WHERE '1.0' IN (x);
265 SELECT x FROM t4 WHERE 1.11 IN (x);
271 SELECT x FROM t4 WHERE '1.11' IN (x);
277 SELECT x, y FROM t5 WHERE x IN (1);
283 SELECT x, y FROM t5 WHERE x IN (1.0);
289 SELECT x, y FROM t5 WHERE x IN ('1');
295 SELECT x, y FROM t5 WHERE x IN ('1.0');
301 SELECT x, y FROM t5 WHERE 1 IN (x);
307 SELECT x, y FROM t5 WHERE 1.0 IN (x);
313 SELECT x, y FROM t5 WHERE '1' IN (x);
319 SELECT x, y FROM t5 WHERE '1.0' IN (x);