Import SQLite 3.10.2.

third_party/sqlite/src/test/lock.test

 # 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.
 #
 #***********************************************************************
@@ skipping 223 matching lines @@
   set ::callback_value {}
   db2 busy callback
   set r [catch {execsql {SELECT * FROM t1} db2} msg]
   lappend r $msg
   lappend r $::callback_value
 } {0 {2 1} {}}
 execsql {ROLLBACK}
 
 # Test the built-in busy timeout handler
 #
+# EVIDENCE-OF: R-23579-05241 PRAGMA busy_timeout; PRAGMA busy_timeout =
+# milliseconds; Query or change the setting of the busy timeout.
+#
 do_test lock-2.8 {
   db2 timeout 400
   execsql BEGIN
   execsql {UPDATE t1 SET a = 0 WHERE 0}
   catchsql {BEGIN EXCLUSIVE;} db2
 } {1 {database is locked}}
 do_test lock-2.8b {
   db2 eval {PRAGMA busy_timeout}
 } {400}
 do_test lock-2.9 {
@@ skipping 186 matching lines @@
 } [list main shared temp $temp_status]
 do_test lock-7.4 {
   sqlite3_finalize $STMT
 } {SQLITE_OK}
 
 do_test lock-999.1 {
   rename db2 {}
 } {}
 
 finish_test