OLD | NEW |
1 # 2006 January 02 | 1 # 2006 January 02 |
2 # | 2 # |
3 # The author disclaims copyright to this source code. In place of | 3 # The author disclaims copyright to this source code. In place of |
4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: |
5 # | 5 # |
6 # May you do good and not evil. | 6 # May you do good and not evil. |
7 # May you find forgiveness for yourself and forgive others. | 7 # May you find forgiveness for yourself and forgive others. |
8 # May you share freely, never taking more than you give. | 8 # May you share freely, never taking more than you give. |
9 # | 9 # |
10 #************************************************************************* | 10 #************************************************************************* |
11 # This file implements regression tests for SQLite library. The | 11 # This file implements regression tests for SQLite library. The |
12 # focus of this script is descending indices. | 12 # focus of this script is descending indices. |
13 # | 13 # |
14 # $Id: descidx3.test,v 1.6 2008/03/19 00:21:31 drh Exp $ | 14 # $Id: descidx3.test,v 1.6 2008/03/19 00:21:31 drh Exp $ |
15 # | 15 # |
16 | 16 |
17 set testdir [file dirname $argv0] | 17 set testdir [file dirname $argv0] |
18 source $testdir/tester.tcl | 18 source $testdir/tester.tcl |
19 | 19 |
| 20 # Do not use a codec for tests in this file, as the database file is |
| 21 # manipulated directly using tcl scripts (using the [hexio_write] command). |
| 22 # |
| 23 do_not_use_codec |
| 24 |
20 ifcapable !bloblit { | 25 ifcapable !bloblit { |
21 finish_test | 26 finish_test |
22 return | 27 return |
23 } | 28 } |
24 db eval {PRAGMA legacy_file_format=OFF} | 29 db eval {PRAGMA legacy_file_format=OFF} |
25 | 30 |
26 # This procedure sets the value of the file-format in file 'test.db' | 31 # This procedure sets the value of the file-format in file 'test.db' |
27 # to $newval. Also, the schema cookie is incremented. | 32 # to $newval. Also, the schema cookie is incremented. |
28 # | 33 # |
29 proc set_file_format {newval} { | 34 proc set_file_format {newval} { |
(...skipping 110 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
140 } {2 4 3 8 6} | 145 } {2 4 3 8 6} |
141 do_test descidx3-4.3 { | 146 do_test descidx3-4.3 { |
142 execsql { | 147 execsql { |
143 UPDATE t1 SET b=2; | 148 UPDATE t1 SET b=2; |
144 SELECT i FROM t1 WHERE a IN (1,2) AND b>0 AND b<'zzz'; | 149 SELECT i FROM t1 WHERE a IN (1,2) AND b>0 AND b<'zzz'; |
145 } | 150 } |
146 } {9 7 6 8 3 4 2 5 1} | 151 } {9 7 6 8 3 4 2 5 1} |
147 } | 152 } |
148 | 153 |
149 finish_test | 154 finish_test |
OLD | NEW |