Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Add a space before each line of error output in the test scripts so that all errors can be conveniently located in logs by doing "grep '^ '". |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
9d532fb50d310df629ea65193f21dc9b |
User & Date: | drh 2015-11-12 21:42:40.423 |
Context
2015-11-12
| ||
22:15 | Always parse the schema *before* running "PRAGMA cache_size", not after. (check-in: 12e7d9ec02 user: drh tags: trunk) | |
21:55 | Import the test_sqllog.c enhancements from trunk. (check-in: 178da33909 user: drh tags: apple-osx) | |
21:42 | Add a space before each line of error output in the test scripts so that all errors can be conveniently located in logs by doing "grep '^ '". (check-in: 9d532fb50d user: drh tags: trunk) | |
20:12 | Add support for the SQLITE_SQLLOG_CONDITIONAL environment variable to the logging code in test_sqllog.c. When defined, logging is only performed if the "<database>-sqllog" file is present in the file system when the main database is opened. (check-in: cab8126be9 user: dan tags: trunk) | |
Changes
Changes to test/pragma2.test.
︙ | ︙ | |||
131 132 133 134 135 136 137 138 139 140 141 142 143 144 | # EVIDENCE-OF: R-23955-02765 Cache_spill is enabled by default # db close delete_file test.db test.db-journal delete_file test2.db test2.db-journal sqlite3 db test.db do_execsql_test pragma2-4.1 { PRAGMA cache_spill; PRAGMA main.cache_spill; PRAGMA temp.cache_spill; } {2000 2000 2000} do_execsql_test pragma2-4.2 { PRAGMA cache_spill=OFF; PRAGMA cache_spill; | > > | 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 | # EVIDENCE-OF: R-23955-02765 Cache_spill is enabled by default # db close delete_file test.db test.db-journal delete_file test2.db test2.db-journal sqlite3 db test.db do_execsql_test pragma2-4.1 { PRAGMA main.cache_size=2000; PRAGMA temp.cache_size=2000; PRAGMA cache_spill; PRAGMA main.cache_spill; PRAGMA temp.cache_spill; } {2000 2000 2000} do_execsql_test pragma2-4.2 { PRAGMA cache_spill=OFF; PRAGMA cache_spill; |
︙ | ︙ |
Changes to test/tester.tcl.
︙ | ︙ | |||
742 743 744 745 746 747 748 | } else { set ok [expr {[string compare $result $expected]==0}] } if {!$ok} { # if {![info exists ::testprefix] || $::testprefix eq ""} { # error "no test prefix" # } | | | | 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 | } else { set ok [expr {[string compare $result $expected]==0}] } if {!$ok} { # if {![info exists ::testprefix] || $::testprefix eq ""} { # error "no test prefix" # } output1 "" output2 " $name expected: \[$expected\]\n $name got: \[$result\]" fail_test $name } else { output1 " Ok" } } } else { output1 " Omitted" |
︙ | ︙ | |||
1043 1044 1045 1046 1047 1048 1049 | run_thread_tests 1 if {[llength $omitList]>0} { output2 "Omitted test cases:" set prec {} foreach {rec} [lsort $omitList] { if {$rec==$prec} continue set prec $rec | | | 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 | run_thread_tests 1 if {[llength $omitList]>0} { output2 "Omitted test cases:" set prec {} foreach {rec} [lsort $omitList] { if {$rec==$prec} continue set prec $rec output2 [format {. %-12s %s} [lindex $rec 0] [lindex $rec 1]] } } if {$nErr>0 && ![working_64bit_int]} { output2 "******************************************************************" output2 "N.B.: The version of TCL that you used to build this test harness" output2 "is defective in that it does not support 64-bit integers. Some or" output2 "all of the test failures above might be a result from this defect" |
︙ | ︙ |
Changes to test/wal3.test.
︙ | ︙ | |||
271 272 273 274 275 276 277 | } [list {0 1 lock exclusive} {1 7 lock exclusive} \ {1 7 unlock exclusive} {0 1 unlock exclusive} \ ] proc lock_callback {method filename handle lock} { if {$lock == "1 7 lock exclusive"} { return SQLITE_BUSY } return SQLITE_OK } | | | | | | 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 | } [list {0 1 lock exclusive} {1 7 lock exclusive} \ {1 7 unlock exclusive} {0 1 unlock exclusive} \ ] proc lock_callback {method filename handle lock} { if {$lock == "1 7 lock exclusive"} { return SQLITE_BUSY } return SQLITE_OK } puts "# Warning: This next test case causes SQLite to call xSleep(1) 100 times." puts "# Normally this equates to a 100ms delay, but if SQLite is built on unix" puts "# without HAVE_USLEEP defined, it may be 100 seconds." do_test wal3-4.3 { db close set ::locks [list] sqlite3 db test.db -vfs T catchsql { SELECT * FROM x } } {1 {locking protocol}} puts "# Warning: Same again!" proc lock_callback {method filename handle lock} { if {$lock == "0 1 lock exclusive"} { return SQLITE_BUSY } return SQLITE_OK } do_test wal3-4.4 { db close set ::locks [list] |
︙ | ︙ |