summaryrefslogtreecommitdiff
path: root/lang/sql/sqlite/test/walthread.test
diff options
context:
space:
mode:
authorLorry Tar Creator <lorry-tar-importer@baserock.org>2015-02-17 17:25:57 +0000
committer <>2015-03-17 16:26:24 +0000
commit780b92ada9afcf1d58085a83a0b9e6bc982203d1 (patch)
tree598f8b9fa431b228d29897e798de4ac0c1d3d970 /lang/sql/sqlite/test/walthread.test
parent7a2660ba9cc2dc03a69ddfcfd95369395cc87444 (diff)
downloadberkeleydb-master.tar.gz
Imported from /home/lorry/working-area/delta_berkeleydb/db-6.1.23.tar.gz.HEADdb-6.1.23master
Diffstat (limited to 'lang/sql/sqlite/test/walthread.test')
-rw-r--r--lang/sql/sqlite/test/walthread.test14
1 files changed, 7 insertions, 7 deletions
diff --git a/lang/sql/sqlite/test/walthread.test b/lang/sql/sqlite/test/walthread.test
index 9817c0e0..6249ce11 100644
--- a/lang/sql/sqlite/test/walthread.test
+++ b/lang/sql/sqlite/test/walthread.test
@@ -129,7 +129,7 @@ proc do_thread_test {args} {
puts "Running $P(testname) for $P(seconds) seconds..."
catch { db close }
- file delete -force test.db test.db-journal test.db-wal
+ forcedelete test.db test.db-journal test.db-wal
sqlite3 db test.db
eval $P(init)
@@ -277,8 +277,8 @@ do_thread_test2 walthread-1 -seconds $seconds(walthread-1) -init {
proc write_transaction {} {
db eval {
BEGIN;
- INSERT INTO t1 VALUES(randomblob(100));
- INSERT INTO t1 VALUES(randomblob(100));
+ INSERT INTO t1 VALUES(randomblob(101 + $::E(pid)));
+ INSERT INTO t1 VALUES(randomblob(101 + $::E(pid)));
INSERT INTO t1 SELECT md5sum(x) FROM t1;
COMMIT;
}
@@ -508,12 +508,12 @@ do_thread_test walthread-5 -seconds $seconds(walthread-5) -init {
COMMIT;
}
- file copy -force test.db-wal bak.db-wal
- file copy -force test.db bak.db
+ forcecopy test.db-wal bak.db-wal
+ forcecopy test.db bak.db
db close
- file copy -force bak.db-wal test.db-wal
- file copy -force bak.db test.db
+ forcecopy bak.db-wal test.db-wal
+ forcecopy bak.db test.db
if {[file size test.db-wal] < [log_file_size [expr 64*1024] 1024]} {
error "Somehow failed to create a large log file"