Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Restore the default connection pool implementation in the test cleanup for ticket [393d954be0]. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
7539c9f0a685f0c9fe50435056b71b71 |
| User & Date: | mistachkin 2013-02-27 07:02:17 |
Context
|
2013-02-27
| ||
| 07:02 | Enhance detection and handling of multiple sets of build output by the test suite. Update Eagle script library in externals to latest trunk. check-in: 7197d1e4c5 user: mistachkin tags: trunk | |
| 07:02 | Restore the default connection pool implementation in the test cleanup for ticket [393d954be0]. check-in: 7539c9f0a6 user: mistachkin tags: trunk | |
| 01:44 | Support using the directory containing the primary managed-only assembly itself as the basis for native library pre-loading via setting the 'PreLoadSQLite_UseAssemblyDirectory' environment variable (to anything). check-in: 80f0294664 user: mistachkin tags: trunk | |
Changes
Changes to Tests/tkt-393d954be0.eagle.
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
..
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
###############################################################################
package require System.Data.SQLite.Test
runSQLiteTestPrologue
###############################################################################
runTest {test tkt-393d954be0-1.1 {custom connection pool} -body {
set nullPool [object create -flags +NonPublic -alias \
System.Data.SQLite.NullConnectionPool true]
object invoke System.Data.SQLite.SQLiteConnection ConnectionPool $nullPool
setupDb [set fileName tkt-393d954be0-1.1.db] "" "" "" "" "Pooling=True;"
set exists(0) [file exists [file join [getDatabaseDirectory] [file tail \
$fileName]]]
cleanupDb $fileName
set exists(1) [file exists [file join [getDatabaseDirectory] [file tail \
$fileName]]]
................................................................................
object invoke -flags +NonPublic System.Data.SQLite.SQLiteConnectionPool \
ClearAllPools
list $exists(0) $exists(1) $counts $openCount $closeCount $totalCount \
[object invoke $nullPool ToString]
} -cleanup {
cleanupDb $fileName
unset -nocomplain db fileName exists counts openCount closeCount totalCount \
nullPool
} -constraints {eagle monoBug28 buildConfiguration.Debug command.sql\
compile.DATA SQLite System.Data.SQLite} -match regexp -result [string map \
[list \n \r\n] {^True False \{\} 0 0 0\
\{Remove\(".*?\\tkt-393d954be0-1\.1\.db",\
|
|
|
>
>
|
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
..
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
###############################################################################
package require System.Data.SQLite.Test
runSQLiteTestPrologue
###############################################################################
runTest {test tkt-393d954be0-1.1 {custom connection pool} -setup {
set nullPool [object create -flags +NonPublic -alias \
System.Data.SQLite.NullConnectionPool true]
object invoke System.Data.SQLite.SQLiteConnection ConnectionPool $nullPool
setupDb [set fileName tkt-393d954be0-1.1.db] "" "" "" "" "Pooling=True;"
} -body {
set exists(0) [file exists [file join [getDatabaseDirectory] [file tail \
$fileName]]]
cleanupDb $fileName
set exists(1) [file exists [file join [getDatabaseDirectory] [file tail \
$fileName]]]
................................................................................
object invoke -flags +NonPublic System.Data.SQLite.SQLiteConnectionPool \
ClearAllPools
list $exists(0) $exists(1) $counts $openCount $closeCount $totalCount \
[object invoke $nullPool ToString]
} -cleanup {
cleanupDb $fileName
catch {object invoke System.Data.SQLite.SQLiteConnection ConnectionPool null}
unset -nocomplain db fileName exists counts openCount closeCount totalCount \
nullPool
} -constraints {eagle monoBug28 buildConfiguration.Debug command.sql\
compile.DATA SQLite System.Data.SQLite} -match regexp -result [string map \
[list \n \r\n] {^True False \{\} 0 0 0\
\{Remove\(".*?\\tkt-393d954be0-1\.1\.db",\
|