database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-29 08:01:23 +03:00
Code Activity

Make the pending byte adjustable via sqlite3_test_control() on all builds,

Browse Source 
not just on test builds. (CVS 6263)

FossilOrigin-Name: e8f192e2a93350a136d86bd9caceff65f52f3513
This commit is contained in:
drh
2009-02-05 16:31:45 +00:00
parent f5d335f851
commit c7a3bb94c2
13 changed files with 105 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
test/tester.tcl
View File

@ -11,7 +11,7 @@
# This file implements some common TCL routines used for regression
# testing the SQLite library
#
# $Id: tester.tcl,v 1.138 2009/02/04 22:46:47 drh Exp $
# $Id: tester.tcl,v 1.139 2009/02/05 16:31:46 drh Exp $
#
# What for user input before continuing. This gives an opportunity
@ -27,7 +27,7 @@ for {set i 0} {$i<[llength $argv]} {incr i} {
}
set tcl_precision 15
set sqlite_pending_byte 0x0010000
sqlite3_test_control_pending_byte 0x0010000
#
# Check the command-line arguments for a default soft-heap-limit.
@ -576,7 +576,7 @@ proc crashsql {args} {
set f [open crash.tcl w]
puts $f "sqlite3_crash_enable 1"
puts $f "sqlite3_crashparams $blocksize $dc $crashdelay $cfile"
puts $f "set sqlite_pending_byte $::sqlite_pending_byte"
puts $f "sqlite3_test_control_pending_byte $::sqlite_pending_byte"
puts $f "sqlite3 db test.db -vfs crash"
# This block sets the cache size of the main database to 10