| OLD | NEW |
| 1 # 2001 September 15 | 1 # 2001 September 15 |
| 2 # | 2 # |
| 3 # The author disclaims copyright to this source code. In place of | 3 # The author disclaims copyright to this source code. In place of |
| 4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: |
| 5 # | 5 # |
| 6 # May you do good and not evil. | 6 # May you do good and not evil. |
| 7 # May you find forgiveness for yourself and forgive others. | 7 # May you find forgiveness for yourself and forgive others. |
| 8 # May you share freely, never taking more than you give. | 8 # May you share freely, never taking more than you give. |
| 9 # | 9 # |
| 10 #*********************************************************************** | 10 #*********************************************************************** |
| 11 # | 11 # |
| 12 # This file implements regression tests for SQLite library. The | 12 # This file implements regression tests for SQLite library. The |
| 13 # focus of this file is testing the effects of a failure in | 13 # focus of this file is testing the effects of a failure in |
| 14 # sqlite3_initialize(). | 14 # sqlite3_initialize(). |
| 15 # | 15 # |
| 16 # | 16 # |
| 17 | 17 |
| 18 set testdir [file dirname $argv0] | 18 set testdir [file dirname $argv0] |
| 19 source $testdir/tester.tcl | 19 source $testdir/tester.tcl |
| 20 if {[db eval {SELECT sqlite_compileoption_used('THREADSAFE=0')}]} { |
| 21 finish_test |
| 22 return |
| 23 } |
| 20 | 24 |
| 21 db close | 25 db close |
| 22 | 26 |
| 23 foreach {t failed rc started} { | 27 foreach {t failed rc started} { |
| 24 1.1 {} SQLITE_OK {mutex mem pcache} | 28 1.1 {} SQLITE_OK {mutex mem pcache} |
| 25 1.2 {mutex} SQLITE_ERROR {} | 29 1.2 {mutex} SQLITE_ERROR {} |
| 26 1.3 {mem} SQLITE_ERROR {mutex} | 30 1.3 {mem} SQLITE_ERROR {mutex} |
| 27 1.4 {pcache} SQLITE_ERROR {mutex mem} | 31 1.4 {pcache} SQLITE_ERROR {mutex mem} |
| 28 } { | 32 } { |
| 29 do_test init-$t.1 { | 33 do_test init-$t.1 { |
| (...skipping 39 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 69 do_test init-2.$zRepeat.$::n.x { | 73 do_test init-2.$zRepeat.$::n.x { |
| 70 init_wrapper_clear | 74 init_wrapper_clear |
| 71 sqlite3_initialize | 75 sqlite3_initialize |
| 72 } SQLITE_OK | 76 } SQLITE_OK |
| 73 init_wrapper_uninstall | 77 init_wrapper_uninstall |
| 74 } | 78 } |
| 75 } | 79 } |
| 76 | 80 |
| 77 autoinstall_test_functions | 81 autoinstall_test_functions |
| 78 finish_test | 82 finish_test |
| 79 | |
| OLD | NEW |