OLD | NEW |
1 # 2006 September 4 | 1 # 2006 September 4 |
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 469 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
480 set zFile [file join [pwd] "[string repeat abcde 104].db"] | 480 set zFile [file join [pwd] "[string repeat abcde 104].db"] |
481 set rc [catch {sqlite3 db2 $zFile} msg] | 481 set rc [catch {sqlite3 db2 $zFile} msg] |
482 list $rc $msg | 482 list $rc $msg |
483 } {1 {unable to open database file}} | 483 } {1 {unable to open database file}} |
484 | 484 |
485 | 485 |
486 db close | 486 db close |
487 file delete -force test.db | 487 file delete -force test.db |
488 | 488 |
489 finish_test | 489 finish_test |
OLD | NEW |