summaryrefslogtreecommitdiff
path: root/lang/sql/sqlite/test/corrupt9.test
diff options
context:
space:
mode:
Diffstat (limited to 'lang/sql/sqlite/test/corrupt9.test')
-rw-r--r--lang/sql/sqlite/test/corrupt9.test10
1 files changed, 7 insertions, 3 deletions
diff --git a/lang/sql/sqlite/test/corrupt9.test b/lang/sql/sqlite/test/corrupt9.test
index f083cf24..bb37758b 100644
--- a/lang/sql/sqlite/test/corrupt9.test
+++ b/lang/sql/sqlite/test/corrupt9.test
@@ -24,6 +24,10 @@ source $testdir/tester.tcl
#
do_not_use_codec
+# These tests deal with corrupt database files
+#
+database_may_be_corrupt
+
# We must have the page_size pragma for these tests to work.
#
ifcapable !pager_pragmas {
@@ -86,7 +90,7 @@ integrity_check corrupt9-1.2
# Make sure the corruption is detected.
#
db close
-file copy -force test.db test.db-template
+forcecopy test.db test.db-template
corrupt_freelist test.db 1
sqlite3 db test.db
@@ -103,7 +107,7 @@ do_test corrupt9-2.2 {
db close
-file copy -force test.db-template test.db
+forcecopy test.db-template test.db
corrupt_freelist test.db 2
sqlite3 db test.db
do_test corrupt9-3.1 {
@@ -118,7 +122,7 @@ do_test corrupt9-3.2 {
} {1 {database disk image is malformed}}
db close
-file copy -force test.db-template test.db
+forcecopy test.db-template test.db
corrupt_freelist test.db 3
sqlite3 db test.db
do_test corrupt9-4.1 {