| OLD | NEW |
| 1 # 2008 April 10 | 1 # 2008 April 10 |
| 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 #*********************************************************************** |
| (...skipping 13 matching lines...) Expand all Loading... |
| 24 } | 24 } |
| 25 | 25 |
| 26 ifcapable !trigger { finish_test ; return } | 26 ifcapable !trigger { finish_test ; return } |
| 27 | 27 |
| 28 | 28 |
| 29 # N will be the number of virtual tables we have defined. | 29 # N will be the number of virtual tables we have defined. |
| 30 # | 30 # |
| 31 unset -nocomplain N | 31 unset -nocomplain N |
| 32 for {set N 1} {$N<=20} {incr N} { | 32 for {set N 1} {$N<=20} {incr N} { |
| 33 db close | 33 db close |
| 34 file delete -force test.db test.db-journal | 34 forcedelete test.db test.db-journal |
| 35 sqlite3 db test.db | 35 sqlite3 db test.db |
| 36 register_echo_module [sqlite3_connection_pointer db] | 36 register_echo_module [sqlite3_connection_pointer db] |
| 37 | 37 |
| 38 # Create $N tables and $N virtual tables to echo them. | 38 # Create $N tables and $N virtual tables to echo them. |
| 39 # | 39 # |
| 40 unset -nocomplain tablist | 40 unset -nocomplain tablist |
| 41 set tablist {} | 41 set tablist {} |
| 42 do_test vtabC-1.$N.1 { | 42 do_test vtabC-1.$N.1 { |
| 43 for {set i 1} {$i<=$::N} {incr i} { | 43 for {set i 1} {$i<=$::N} {incr i} { |
| 44 execsql "CREATE TABLE t${i}(x)" | 44 execsql "CREATE TABLE t${i}(x)" |
| (...skipping 62 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 107 } $res | 107 } $res |
| 108 do_test vtabC-1.$N.10.$j { | 108 do_test vtabC-1.$N.10.$j { |
| 109 execsql "SELECT * FROM vt$::j" | 109 execsql "SELECT * FROM vt$::j" |
| 110 } $res | 110 } $res |
| 111 } | 111 } |
| 112 } | 112 } |
| 113 unset -nocomplain res N i j | 113 unset -nocomplain res N i j |
| 114 | 114 |
| 115 | 115 |
| 116 finish_test | 116 finish_test |
| OLD | NEW |