Prevent the tcl test suite from throwing an exception when a threadsafe SQLite is linked against a non-threadsafe Tcl for testing. Print a warning instead. Ticket #3753. (CVS 6389)

FossilOrigin-Name: a22e7c818b2227a4c80ad84b299d11f365e3b17d

test/thread003.test

@@ -12,20 +12,12 @@
 #   This file contains tests that attempt to break the pcache module
 #   by bombarding it with simultaneous requests from multiple threads.
 #     
-# $Id: thread003.test,v 1.7 2009/03/12 14:43:28 danielk1977 Exp $
+# $Id: thread003.test,v 1.8 2009/03/26 14:48:07 danielk1977 Exp $
 
 set testdir [file dirname $argv0]
 
 source $testdir/tester.tcl
-source $testdir/thread_common.tcl
-if {[info commands sqlthread] eq ""} {
-  finish_test
-  return
-}
-ifcapable !mutex {
-  finish_test
-  return
-}
+if {[run_thread_tests]==0} { finish_test ; return }
 
 # Set up a couple of different databases full of pseudo-randomly 
 # generated data.