Index: third_party/sqlite/sqlite-src-3080704/test/async.test |
diff --git a/third_party/sqlite/sqlite-src-3080704/test/async.test b/third_party/sqlite/sqlite-src-3080704/test/async.test |
deleted file mode 100644 |
index e1bc08642e50a2fc409b3ecdab14aa74b88ab1b1..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/test/async.test |
+++ /dev/null |
@@ -1,90 +0,0 @@ |
-# |
-# May you do good and not evil. |
-# May you find forgiveness for yourself and forgive others. |
-# May you share freely, never taking more than you give. |
-# |
-#*********************************************************************** |
-# This file runs all tests. |
-# |
-# $Id: async.test,v 1.21 2009/06/05 17:09:12 drh Exp $ |
- |
-set testdir [file dirname $argv0] |
-source $testdir/tester.tcl |
- |
-if {[info commands sqlite3async_initialize] eq ""} { |
- # The async logic is not built into this system |
- finish_test |
- return |
-} |
- |
-rename finish_test async_really_finish_test |
-proc finish_test {} { |
- catch {db close} |
- catch {db2 close} |
- catch {db3 close} |
-} |
-if {[info exists G(isquick)]} { set ASYNC_SAVE_ISQUICK $G(isquick) } |
-set G(isquick) 1 |
- |
-set ASYNC_INCLUDE { |
- insert.test |
- insert2.test |
- insert3.test |
- lock.test |
- lock2.test |
- lock3.test |
- select1.test |
- select2.test |
- select3.test |
- select4.test |
- trans.test |
-} |
- |
-# Enable asynchronous IO. |
-sqlite3async_initialize "" 1 |
- |
-# This proc flushes the contents of the async-IO queue through to the |
-# underlying VFS. A couple of the test scripts identified in $ASYNC_INCLUDE |
-# above contain lines like "catch flush_async_queue" in places where |
-# this is required for the tests to work in async mode. |
-# |
-proc flush_async_queue {} { |
- sqlite3async_control halt idle |
- sqlite3async_start |
- sqlite3async_wait |
- sqlite3async_control halt never |
-} |
- |
-rename do_test async_really_do_test |
-proc do_test {name args} { |
- uplevel async_really_do_test async_io-$name $args |
- flush_async_queue |
-} |
- |
-foreach testfile [lsort -dictionary [glob $testdir/*.test]] { |
- set tail [file tail $testfile] |
- if {[lsearch -exact $ASYNC_INCLUDE $tail]<0} continue |
- source $testfile |
- |
- # Make sure everything is flushed through. This is because [source]ing |
- # the next test file will delete the database file on disk (using |
- # [delete_file]). If the asynchronous backend still has the file |
- # open, it will become confused. |
- # |
- flush_async_queue |
-} |
- |
-# Flush the write-queue and disable asynchronous IO. This should ensure |
-# all allocated memory is cleaned up. |
-set sqlite3async_trace 1 |
-flush_async_queue |
-sqlite3async_shutdown |
-set sqlite3async_trace 0 |
- |
-rename do_test {} |
-rename async_really_do_test do_test |
-rename finish_test {} |
-rename async_really_finish_test finish_test |
- |
-if {[info exists ASYNC_SAVE_ISQUICK]} { set G(isquick) $ASYNC_SAVE_ISQUICK } |
-finish_test |