aboutsummaryrefslogtreecommitdiff
path: root/test/lock_common.tcl
diff options
context:
space:
mode:
authordan <dan@noemail.net>2018-12-24 15:22:47 +0000
committerdan <dan@noemail.net>2018-12-24 15:22:47 +0000
commit94e95ea46e89f34adeba606db60f4691a25d7c1f (patch)
tree70a34cb71ca9008af0cc2a8edeb7d0b2cf35e9b3 /test/lock_common.tcl
parent29e9af88484b2266189d694faa3eb3e69f0a7190 (diff)
downloadsqlite-94e95ea46e89f34adeba606db60f4691a25d7c1f.tar.gz
sqlite-94e95ea46e89f34adeba606db60f4691a25d7c1f.zip
Copy some extra test infrastructure from the mutexfree-shmlock branch to trunk.
FossilOrigin-Name: 883337ffdb434b6856ceaada121c0be67e2fdec7b447675f45e85568ef28d7d9
Diffstat (limited to 'test/lock_common.tcl')
-rw-r--r--test/lock_common.tcl10
1 files changed, 6 insertions, 4 deletions
diff --git a/test/lock_common.tcl b/test/lock_common.tcl
index a758e7af2..3e1821bab 100644
--- a/test/lock_common.tcl
+++ b/test/lock_common.tcl
@@ -15,18 +15,20 @@
proc do_multiclient_test {varname script} {
- foreach code [list {
+ foreach {tn code} [list 1 {
if {[info exists ::G(valgrind)]} { db close ; continue }
set ::code2_chan [launch_testfixture]
set ::code3_chan [launch_testfixture]
proc code2 {tcl} { testfixture $::code2_chan $tcl }
proc code3 {tcl} { testfixture $::code3_chan $tcl }
- set tn 1
- } {
+ } 2 {
proc code2 {tcl} { uplevel #0 $tcl }
proc code3 {tcl} { uplevel #0 $tcl }
- set tn 2
}] {
+ # Do not run multi-process tests with the unix-excl VFS.
+ #
+ if {$tn==1 && [permutation]=="unix-excl"} continue
+
faultsim_delete_and_reopen
proc code1 {tcl} { uplevel #0 $tcl }