1: # 2008 January 13
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: # This file implements regression tests for SQLite library.
12: #
13: # This file implements tests to verify that ticket #3581 has been
14: # fixed.
15: #
16: # $Id: tkt3581.test,v 1.1.1.1 2012/02/21 17:04:16 misho Exp $
17:
18: set testdir [file dirname $argv0]
19: source $testdir/tester.tcl
20:
21: do_test tkt3581-1.1 {
22: db eval {
23: CREATE TABLE t1(a INTEGER PRIMARY KEY, b, c);
24: INSERT INTO t1 VALUES(0,544,846);
25: INSERT INTO t1 VALUES(1,345,51);
26: CREATE TABLE t2(a INTEGER PRIMARY KEY, b, c);
27: INSERT INTO t2 SELECT * FROM t1;
28: CREATE INDEX i2 on t2(c);
29: }
30: } {}
31:
32: do_test tkt3581-1.2 {
33: db eval {
34: SELECT a FROM t1
35: WHERE (b > 45 AND c < 356)
36: OR b <= 733
37: OR b >= 557
38: OR (b >= 614 AND c < 251)
39: ORDER BY b;
40: }
41: } {1 0}
42:
43: do_test tkt3581-1.3 {
44: db eval {
45: SELECT a FROM t2
46: WHERE (b > 45 AND c < 356)
47: OR b <= 733
48: OR b >= 557
49: OR (b >= 614 AND c < 251)
50: ORDER BY b;
51: }
52: } {1 0}
53:
54: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>