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

Commit first version of the 'backup' feature. (CVS 6241)

FossilOrigin-Name: 663479b417fc06ba1790a544f28694f8797cee57
This commit is contained in:
danielk1977
2009-02-03 16:51:24 +00:00
parent 7ed0cae237
commit 0410302e58
26 changed files with 2157 additions and 288 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.136 2009/01/09 10:49:14 danielk1977 Exp $
# $Id: tester.tcl,v 1.137 2009/02/03 16:51:25 danielk1977 Exp $
#
# What for user input before continuing. This gives an opportunity
@ -485,11 +485,9 @@ proc forcedelete {filename} {
# Do an integrity check of the entire database
#
proc integrity_check {name} {
proc integrity_check {name {db db}} {
ifcapable integrityck {
do_test $name {
execsql {PRAGMA integrity_check}
} {ok}
do_test $name [list execsql {PRAGMA integrity_check} $db] {ok}
}
}