Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Cleanup two tests that were leaking variables and/or objects. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
ec423e6d9e07c184bff66dcb5bcbce71 |
User & Date: | mistachkin 2011-11-23 02:40:54.711 |
Context
2011-11-23
| ||
07:12 | Correct native platform checks in the interop project files and the test runner batch file. check-in: f42a1a5da8 user: mistachkin tags: trunk | |
02:40 | Cleanup two tests that were leaking variables and/or objects. check-in: ec423e6d9e user: mistachkin tags: trunk | |
2011-11-16
| ||
05:13 | Correct minor usage problem with the %_ECHO% 'macro' in the batch tools. check-in: bfd8d6874d user: mistachkin tags: trunk | |
Changes
Changes to Tests/tkt-2ce0870fad.eagle.
︙ | ︙ | |||
33 34 35 36 37 38 39 40 41 42 43 44 45 46 | for {set i 1} {$i < 3} {incr i} { runTest {test [appendArgs tkt-2ce0870fad-1. $i] {logging setup} -setup \ [getAppDomainPreamble { set i {$i} set appDomainId($i) {[object invoke AppDomain.CurrentDomain Id]} set fileName {[appendArgs tkt-2ce0870fad-1. $i .db]} }] -body { set appDomainId(3) [object invoke AppDomain.CurrentDomain Id] package require EagleLibrary package require EagleTest package require System.Data.SQLite.Test | > > > > > > > > | | > > > > > > > > | > | 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 | for {set i 1} {$i < 3} {incr i} { runTest {test [appendArgs tkt-2ce0870fad-1. $i] {logging setup} -setup \ [getAppDomainPreamble { set i {$i} set appDomainId($i) {[object invoke AppDomain.CurrentDomain Id]} set fileName {[appendArgs tkt-2ce0870fad-1. $i .db]} # # NOTE: Keep track of whether or not the global test year and configuration # variables already exist in the primary application domain before the # test. If not, we will need to unset them after the test. # set hadTestYear {[info exists ::test_year]} set hadTestConfiguration {[info exists ::test_configuration]} }] -body { set appDomainId(3) [object invoke AppDomain.CurrentDomain Id] package require EagleLibrary package require EagleTest package require System.Data.SQLite.Test set assembly [object load -loadtype File [file join [getBinaryDirectory] \ System.Data.SQLite.dll]] object invoke System.Data.SQLite.SQLiteLog Initialize list $appDomainId($i) $appDomainId(3) [expr {$i == 1 ? \ $appDomainId($i) != $appDomainId(3) : \ $appDomainId($i) == $appDomainId(3)}] [setupDb $fileName] } -cleanup { cleanupDb $fileName if {!$hadTestConfiguration} then { unset -nocomplain ::test_configuration } if {!$hadTestYear} then { unset -nocomplain ::test_year } # # NOTE: If this is the primary application domain, skip unsetting the # loop variable because the surrounding [for] command still needs # it. # if {$i <= 1} then { unset -nocomplain i } unset -nocomplain assembly appDomainId db fileName hadTestConfiguration \ hadTestYear } -constraints {eagle monoBug28 command.sql compile.DATA\ compile.ISOLATED_INTERPRETERS SQLite System.Data.SQLite} -isolationLevel \ [expr {$i == 1 ? "AppDomain" : "Default"}] -match regexp -result \ {^\d+ \d+ True SQLiteConnection#\d+$}} } ############################################################################### |
︙ | ︙ |
Changes to Tests/tkt-e30b820248.eagle.
︙ | ︙ | |||
250 251 252 253 254 255 256 | [expr {$code eq "Ok" ? [catch { object invoke _Dynamic${id}.Test${id} Main } result] : [set result ""]}] $result \ [reportSQLiteResources $test_channel true] } -cleanup { cleanupDb $fileName | | > | 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 | [expr {$code eq "Ok" ? [catch { object invoke _Dynamic${id}.Test${id} Main } result] : [set result ""]}] $result \ [reportSQLiteResources $test_channel true] } -cleanup { cleanupDb $fileName unset -nocomplain result code results errors sql name dataSource id db \ fileName } -constraints {eagle logFile monoBug28 command.sql compile.DATA SQLite\ System.Data.SQLite} -match regexp -result [appendArgs "^Ok\ System#CodeDom#Compiler#CompilerResults#\\d+ \\{\\} 0 \\{\\} " $memory_used \$]} } ############################################################################### |
︙ | ︙ |