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 #*********************************************************************** |
(...skipping 391 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
402 fconfigure $f -encoding binary | 402 fconfigure $f -encoding binary |
403 seek $f [expr [file size test.db-journal] - 12] | 403 seek $f [expr [file size test.db-journal] - 12] |
404 puts -nonewline $f "\00\00\00\00" | 404 puts -nonewline $f "\00\00\00\00" |
405 close $f | 405 close $f |
406 } {} | 406 } {} |
407 do_test crash-7.2 { | 407 do_test crash-7.2 { |
408 signature | 408 signature |
409 } $sig | 409 } $sig |
410 | 410 |
411 finish_test | 411 finish_test |
OLD | NEW |