diff options
Diffstat (limited to 'lang/sql/sqlite/test/journal1.test')
| -rw-r--r-- | lang/sql/sqlite/test/journal1.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lang/sql/sqlite/test/journal1.test b/lang/sql/sqlite/test/journal1.test index a1b17b41..c89dd2b4 100644 --- a/lang/sql/sqlite/test/journal1.test +++ b/lang/sql/sqlite/test/journal1.test @@ -20,7 +20,7 @@ set testdir [file dirname $argv0] source $testdir/tester.tcl # These tests will not work on windows because windows uses -# manditory file locking which breaks the file copy command. +# manditory file locking which breaks the copy_file command. # if {$tcl_platform(platform)=="windows"} { finish_test @@ -41,7 +41,7 @@ do_test journal1-1.1 { } 8 # Make changes to the database and save the journal file. -# Then delete the database. Replace the the journal file +# Then delete the database. Replace the journal file # and try to create a new database with the same name. The # old journal should not attempt to rollback into the new # database. @@ -51,13 +51,13 @@ do_test journal1-1.2 { BEGIN; DELETE FROM t1; } - file copy -force test.db-journal test.db-journal-bu + forcecopy test.db-journal test.db-journal-bu execsql { ROLLBACK; } db close - file delete test.db - file copy test.db-journal-bu test.db-journal + delete_file test.db + copy_file test.db-journal-bu test.db-journal sqlite3 db test.db catchsql { SELECT * FROM sqlite_master |