Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Fix typos in the names of some regression tests. Ticket #962. (CVS 2023) |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
77542beb31349b85bdf404c46980da34 |
User & Date: | drh 2004-10-18 21:34:47.000 |
Context
2004-10-19
| ||
01:31 | Fix a typo in the quickstart document. (CVS 2024) (check-in: 55b03c560d user: drh tags: trunk) | |
2004-10-18
| ||
21:34 | Fix typos in the names of some regression tests. Ticket #962. (CVS 2023) (check-in: 77542beb31 user: drh tags: trunk) | |
2004-10-12
| ||
02:38 | Fix typo on homepage. Ticket #956. (CVS 2022) (check-in: 552ec6770a user: drh tags: trunk) | |
Changes
Changes to test/btree.test.
1 2 3 4 5 6 7 8 9 10 11 12 13 | # 2001 September 15 # # The author disclaims copyright to this source code. In place of # a legal notice, here is a blessing: # # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this script is btree database backend # | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | # 2001 September 15 # # The author disclaims copyright to this source code. In place of # a legal notice, here is a blessing: # # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this script is btree database backend # # $Id: btree.test,v 1.31 2004/10/18 21:34:47 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl # Basic functionality. Open and close a database. # |
︙ | ︙ | |||
753 754 755 756 757 758 759 | btree_close_cursor $::c1 btree_drop_table $::b1 2 btree_integrity_check $::b1 1 } {} do_test btree-8.23.2 { btree_create_table $::b1 0 } {2} | | | 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 | btree_close_cursor $::c1 btree_drop_table $::b1 2 btree_integrity_check $::b1 1 } {} do_test btree-8.23.2 { btree_create_table $::b1 0 } {2} do_test btree-8.23.3 { set ::c1 [btree_cursor $::b1 2 1] lindex [btree_get_meta $::b1] 0 } {4} do_test btree-8.24 { lindex [btree_pager_stats $::b1] 1 } {2} #btree_pager_ref_dump $::b1 |
︙ | ︙ |
Changes to test/intpkey.test.
︙ | ︙ | |||
9 10 11 12 13 14 15 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file implements tests for the special processing associated # with INTEGER PRIMARY KEY columns. # | | | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # #*********************************************************************** # This file implements regression tests for SQLite library. # # This file implements tests for the special processing associated # with INTEGER PRIMARY KEY columns. # # $Id: intpkey.test,v 1.19 2004/10/18 21:34:47 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl # Create a table with a primary key and a datatype other than # integer # |
︙ | ︙ | |||
367 368 369 370 371 372 373 | execsql { INSERT INTO t1 VALUES(0,'zero','entry'); } count { SELECT * FROM t1 WHERE a=0; } } {0 zero entry 0} | | | 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 | execsql { INSERT INTO t1 VALUES(0,'zero','entry'); } count { SELECT * FROM t1 WHERE a=0; } } {0 zero entry 0} do_test intpkey-5.2 { execsql { SELECT rowid, a FROM t1 } } {-4 -4 0 0 5 5 6 6 11 11} # Test the ability of the COPY command to put data into a # table that contains an integer primary key. |
︙ | ︙ |
Changes to test/progress.test.
1 2 3 4 5 6 7 8 9 10 11 12 13 | # 2001 September 15 # # The author disclaims copyright to this source code. In place of # a legal notice, here is a blessing: # # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this file is testing the 'progress callback'. # | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | # 2001 September 15 # # The author disclaims copyright to this source code. In place of # a legal notice, here is a blessing: # # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # This file implements regression tests for SQLite library. The # focus of this file is testing the 'progress callback'. # # $Id: progress.test,v 1.4 2004/10/18 21:34:47 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl # Build some test data # execsql { |
︙ | ︙ | |||
49 50 51 52 53 54 55 | } {::namespace inscope :: {incr counter} ; expr 0} do_test progress-1.0.2 { set v [catch {db progress xyz bogus} msg] lappend v $msg } {1 {expected integer but got "xyz"}} # Test that the query is abandoned when the progress callback returns non-zero | | | | 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 | } {::namespace inscope :: {incr counter} ; expr 0} do_test progress-1.0.2 { set v [catch {db progress xyz bogus} msg] lappend v $msg } {1 {expected integer but got "xyz"}} # Test that the query is abandoned when the progress callback returns non-zero do_test progress-1.1 { set counter 0 db progress 1 "[namespace code {incr counter}] ; expr 1" set rc [catch {execsql { SELECT * FROM t1 }}] list $counter $rc } {1 1} # Test that the query is rolled back when the progress callback returns # non-zero. do_test progress-1.2 { # This figures out how many opcodes it takes to copy 5 extra rows into t1. db progress 1 "[namespace code {incr five_rows}] ; expr 0" set five_rows 0 execsql { INSERT INTO t1 SELECT a+10 FROM t1 WHERE a < 6 } |
︙ | ︙ | |||
88 89 90 91 92 93 94 | execsql { SELECT count(*) FROM t1 } } 10 # Test that an active transaction remains active and not rolled back after the # progress query abandons a query. | | | | 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 | execsql { SELECT count(*) FROM t1 } } 10 # Test that an active transaction remains active and not rolled back after the # progress query abandons a query. do_test progress-1.3 { db progress 0 "" execsql BEGIN execsql { INSERT INTO t1 VALUES(11) } db progress 1 "expr 1" catchsql { INSERT INTO t1 VALUES(12) } db progress 0 "" execsql COMMIT execsql { SELECT count(*) FROM t1 } } 11 # Check that a value of 0 for N means no progress callback do_test progress-1.4 { set counter 0 db progress 0 "[namespace code {incr counter}] ; expr 0" execsql { SELECT * FROM t1; } set counter } 0 db progress 0 "" finish_test |