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 157 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
168 lappend ::res $a $b $c | 168 lappend ::res $a $b $c |
169 db progress 10 "expr 1" | 169 db progress 10 "expr 1" |
170 catch {db eval {SELECT a, b, c FROM abc} { }} msg | 170 catch {db eval {SELECT a, b, c FROM abc} { }} msg |
171 lappend ::res $msg | 171 lappend ::res $msg |
172 } | 172 } |
173 | 173 |
174 set ::res | 174 set ::res |
175 } {1 2 3 interrupted 4 5 6 interrupted 7 8 9 interrupted} | 175 } {1 2 3 interrupted 4 5 6 interrupted 7 8 9 interrupted} |
176 | 176 |
177 finish_test | 177 finish_test |
OLD | NEW |