| Index: third_party/sqlite/src/test/exclusive.test
|
| diff --git a/third_party/sqlite/src/test/exclusive.test b/third_party/sqlite/src/test/exclusive.test
|
| index 2c1b35034855727ba5817a5f6a5eca3e772d3c06..33cd667d27af9c55956c4ab7167019e32531c72d 100644
|
| --- a/third_party/sqlite/src/test/exclusive.test
|
| +++ b/third_party/sqlite/src/test/exclusive.test
|
| @@ -212,7 +212,7 @@ do_test exclusive-2.8 {
|
| ROLLBACK;
|
| } db2
|
| } {}
|
| -sqlite3_soft_heap_limit $soft_limit
|
| +sqlite3_soft_heap_limit $cmdlinearg(soft-heap-limit)
|
|
|
| do_test exclusive-2.9 {
|
| # Write the database to establish the exclusive lock with connection 'db.
|
| @@ -253,6 +253,11 @@ db2 close
|
| # from being inspected externally.
|
| #
|
| if {$tcl_platform(platform) != "windows"} {
|
| +
|
| + # Return a list of two booleans (either 0 or 1). The first is true
|
| + # if the named file exists. The second is true only if the file
|
| + # exists and the first 28 bytes contain at least one non-zero byte.
|
| + #
|
| proc filestate {fname} {
|
| set exists 0
|
| set content 0
|
| @@ -263,6 +268,7 @@ if {$tcl_platform(platform) != "windows"} {
|
| }
|
| list $exists $content
|
| }
|
| +
|
| do_test exclusive-3.0 {
|
| filestate test.db-journal
|
| } {0 0}
|
| @@ -390,7 +396,7 @@ do_test exclusive-4.5 {
|
| # longer active.
|
| #
|
| db close
|
| -sqlite db test.db
|
| +sqlite3 db test.db
|
|
|
| # if we're using proxy locks, we use 3 filedescriptors for a db
|
| # that is open but NOT writing changes, normally
|
|
|