Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Coverage improvements for main.c. (CVS 3023) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
50964ef9b0159bfdcd7eae88b0806957 |
| User & Date: | danielk1977 2006-01-24 11:30:27 |
Context
|
2006-01-24
| ||
| 12:09 | Rename some variables to avoid hiding others. Also add "static" to two function signatures that were missing it. (CVS 3024) (check-in: d86f18a4 user: danielk1977 tags: trunk) | |
| 11:30 | Coverage improvements for main.c. (CVS 3023) (check-in: 50964ef9 user: danielk1977 tags: trunk) | |
| 10:58 | General test coverage improvements. (CVS 3022) (check-in: 153940af user: danielk1977 tags: trunk) | |
Changes
Changes to test/shared2.test.
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
..
76
77
78
79
80
81
82
83
84
85
|
# # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # # $Id: shared2.test,v 1.1 2006/01/19 08:43:32 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl db close ifcapable !shared_cache { finish_test ................................................................................ } } list $a $count } {32 64} db1 close db2 close sqlite3_enable_shared_cache $::enable_shared_cache finish_test |
|
>
>
>
>
>
|
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
..
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
# # May you do good and not evil. # May you find forgiveness for yourself and forgive others. # May you share freely, never taking more than you give. # #*********************************************************************** # # $Id: shared2.test,v 1.2 2006/01/24 11:30:27 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl db close ifcapable !shared_cache { finish_test ................................................................................ } } list $a $count } {32 64} db1 close db2 close do_test shared2-1.4 { sqlite3_thread_cleanup sqlite3_enable_shared_cache 1 } {0} sqlite3_enable_shared_cache $::enable_shared_cache finish_test |
Changes to test/shared_err.test.
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
...
329
330
331
332
333
334
335
336
337
338
|
# #*********************************************************************** # # The focus of the tests in this file are IO errors that occur in a shared # cache context. What happens to connection B if one connection A encounters # an IO-error whilst reading or writing the file-system? # # $Id: shared_err.test,v 1.7 2006/01/24 00:15:16 drh Exp $ proc skip {args} {} set testdir [file dirname $argv0] source $testdir/tester.tcl db close ................................................................................ dbX close dbY close } -cleanup { catch {dbX close} catch {dbY close} } catch {db close} sqlite3_enable_shared_cache $::enable_shared_cache finish_test |
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
...
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
|
# #*********************************************************************** # # The focus of the tests in this file are IO errors that occur in a shared # cache context. What happens to connection B if one connection A encounters # an IO-error whilst reading or writing the file-system? # # $Id: shared_err.test,v 1.8 2006/01/24 11:30:27 danielk1977 Exp $ proc skip {args} {} set testdir [file dirname $argv0] source $testdir/tester.tcl db close ................................................................................ dbX close dbY close } -cleanup { catch {dbX close} catch {dbY close} } do_malloc_test 6 -tclbody { catch {db close} sqlite3_thread_cleanup sqlite3_enable_shared_cache 0 } -cleanup { sqlite3_enable_shared_cache 1 } do_test shared_misuse-7.1 { sqlite3 db test.db catch { sqlite3_enable_shared_cache 0 } msg set msg } {library routine called out of sequence} catch {db close} sqlite3_enable_shared_cache $::enable_shared_cache finish_test |