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

Enhance the INTEGRITY_CHECK pragma to test the auxiliary database file in

Browse Source 
addition to the main database file. (CVS 642)

FossilOrigin-Name: 52eba4de301121f254174b74042015bf6069ef11
This commit is contained in:
drh
2002-06-25 13:16:02 +00:00
parent 90c0bb0b07
commit 2150432e7c
11 changed files with 68 additions and 53 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
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.22 2002/03/06 22:01:37 drh Exp $
# $Id: tester.tcl,v 1.23 2002/06/25 13:16:04 drh Exp $
# Make sure tclsqlite was compiled correctly. Abort now with an
# error message if not.
@ -217,3 +217,11 @@ proc forcedelete {filename} {
exec rm -rf $filename
}
}
# Do an integrity check of the entire database
#
proc integrity_check {name} {
do_test $name {
execsql {PRAGMA integrity_check}
} {ok ok}
}