1
0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00

Add some tests (and 2 resulting bug fixes) to incr vacuum mode. (CVS 3885)

FossilOrigin-Name: 89b1b3f897bda1fffceb9cf72fa4d42b809ccb8e
This commit is contained in:
danielk1977
2007-04-28 15:47:43 +00:00
parent 8ffcadb57e
commit b4626a3e16
9 changed files with 142 additions and 22 deletions

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.79 2007/04/19 12:30:54 drh Exp $
# $Id: tester.tcl,v 1.80 2007/04/28 15:47:45 danielk1977 Exp $
# Make sure tclsqlite3 was compiled correctly. Abort now with an
# error message if not.
@ -399,6 +399,7 @@ proc do_ioerr_test {testname args} {
set ::go 1
for {set n $::ioerropts(-start)} {$::go} {incr n} {
set ::TN $n
incr ::ioerropts(-count) -1
if {$::ioerropts(-count)<0} break