database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00
Code Activity

Fix test script bugs in the thread002.test and thread_common.tcl. (CVS 6352)

Browse Source 
FossilOrigin-Name: d137e841ce90be92f4c18218f35d22e3a06b0f14
This commit is contained in:
drh
2009-03-17 15:39:31 +00:00
parent 1f4969a117
commit 3ded8d6f2a
4 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
test/thread_common.tcl
View File

@ -9,7 +9,7 @@
#
#***********************************************************************
#
# $Id: thread_common.tcl,v 1.3 2009/01/19 17:40:12 drh Exp $
# $Id: thread_common.tcl,v 1.4 2009/03/17 15:39:31 drh Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -50,7 +50,7 @@ set thread_procs {
}
set rc [sqlite3_finalize $::STMT]
} else {
if {[string first (6) $msg]} {
if {[lindex $msg 0]=="(6)"} {
set rc SQLITE_LOCKED
} else {
set rc SQLITE_ERROR