Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | In the async test, make sure procedures do not get renamed over top of one another. (CVS 6490) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | b6430cc4297c426f89e68f180a2c50b9 |
| User & Date: | drh 2009-04-10 20:55:14 |
Context
|
2009-04-10
| ||
| 23:11 | Remove more unused branches from vdbeapi.c. (CVS 6491) check-in: 447e9595 user: drh tags: trunk | |
| 20:55 | In the async test, make sure procedures do not get renamed over top of one another. (CVS 6490) check-in: b6430cc4 user: drh tags: trunk | |
| 20:32 | Remove unused branches from the vdbeapi.c module. (CVS 6489) check-in: 7ae0fc7e user: drh tags: trunk | |
Changes
Changes to test/async.test.
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
..
77
78
79
80
81
82
83
84
|
# 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. # #*********************************************************************** # This file runs all tests. # # $Id: async.test,v 1.17 2009/04/10 18:21:29 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl if {[catch {sqlite3async_enable}]} { # The async logic is not built into this system finish_test return } rename finish_test really_finish_test proc finish_test {} { catch {db close} catch {db2 close} catch {db3 close} } set ISQUICK 1 ................................................................................ sqlite3async_enable 0 set sqlite3async_trace 0 really_finish_test rename do_test {} rename async_really_do_test do_test rename finish_test {} rename really_finish_test finish_test |
|
|
|
|
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
..
77
78
79
80
81
82
83
84
|
# 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. # #*********************************************************************** # This file runs all tests. # # $Id: async.test,v 1.18 2009/04/10 20:55:14 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl if {[catch {sqlite3async_enable}]} { # The async logic is not built into this system finish_test return } rename finish_test async_really_finish_test proc finish_test {} { catch {db close} catch {db2 close} catch {db3 close} } set ISQUICK 1 ................................................................................ sqlite3async_enable 0 set sqlite3async_trace 0 really_finish_test rename do_test {} rename async_really_do_test do_test rename finish_test {} rename async_really_finish_test finish_test |