OLD | NEW |
| (Empty) |
1 # 2007 Aug 29 | |
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 # | |
12 # This test script checks that tickets #2794, #2795, #2796, and #2797 | |
13 # have been fixed. | |
14 # | |
15 # $Id: mallocF.test,v 1.4 2008/02/18 22:24:58 drh Exp $ | |
16 | |
17 set testdir [file dirname $argv0] | |
18 source $testdir/tester.tcl | |
19 source $testdir/malloc_common.tcl | |
20 | |
21 # Only run these tests if memory debugging is turned on. | |
22 # | |
23 if {!$MEMDEBUG} { | |
24 puts "Skipping mallocF tests: not compiled with -DSQLITE_MEMDEBUG..." | |
25 finish_test | |
26 return | |
27 } | |
28 | |
29 # tickets #2794 and #2795 and #2797 | |
30 # | |
31 set PREP { | |
32 CREATE TABLE t1(x,y); | |
33 INSERT INTO t1 VALUES('abc123', 5); | |
34 INSERT INTO t1 VALUES('xyz987', 42); | |
35 } | |
36 do_malloc_test malloeF-1 -sqlprep $PREP -sqlbody { | |
37 SELECT * FROM t1 WHERE x GLOB 'abc*' | |
38 } | |
39 | |
40 # ticket #2796 | |
41 # | |
42 set PREP { | |
43 CREATE TABLE t1(x PRIMARY KEY,y UNIQUE); | |
44 INSERT INTO t1 VALUES('abc123', 5); | |
45 INSERT INTO t1 VALUES('xyz987', 42); | |
46 } | |
47 do_malloc_test malloeF-2 -sqlprep $PREP -sqlbody { | |
48 SELECT x FROM t1 | |
49 WHERE y=1 OR y=2 OR y=3 OR y=4 OR y=5 | |
50 OR y=6 OR y=7 OR y=8 OR y=9 OR y=10 | |
51 OR y=11 OR y=12 OR y=13 OR y=14 OR y=15 | |
52 OR y=x | |
53 } | |
54 | |
55 set PREP { | |
56 CREATE TABLE t1(x PRIMARY KEY,y UNIQUE); | |
57 INSERT INTO t1 VALUES('abc123', 5); | |
58 INSERT INTO t1 VALUES('xyz987', 42); | |
59 } | |
60 do_malloc_test malloeF-3 -sqlprep $PREP -sqlbody { | |
61 SELECT x FROM t1 WHERE y BETWEEN 10 AND 29 | |
62 } | |
63 | |
64 # Ticket #2843 | |
65 # | |
66 set PREP { | |
67 CREATE TABLE t1(x); | |
68 CREATE TRIGGER r1 BEFORE INSERT ON t1 BEGIN | |
69 SELECT 'hello'; | |
70 END; | |
71 } | |
72 do_malloc_test mallocF-4 -sqlprep $PREP -sqlbody { | |
73 INSERT INTO t1 VALUES(random()); | |
74 } | |
75 | |
76 finish_test | |
OLD | NEW |