System.Data.SQLite

Check-in [7f19f2449d]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Remove unnecessary redundancy in the test for [b4a7ddc83f] and verify that it ran in a non-primary AppDomain.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 7f19f2449d58ca9d817f99765e5646673ab172ea
User & Date: mistachkin 2011-07-21 23:50:28.603
Context
2011-07-22
21:21
Fix issue with building in a Visual Studio Command Prompt window. Support building and testing the VS2010 projects using the .NET Framework 3.5. check-in: a912d7f434 user: mistachkin tags: trunk
2011-07-21
23:50
Remove unnecessary redundancy in the test for [b4a7ddc83f] and verify that it ran in a non-primary AppDomain. check-in: 7f19f2449d user: mistachkin tags: trunk
21:46
Add comment to warn about the nature of the current fix for [b4a7ddc83f]. check-in: f5c5f581dc user: mistachkin tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to Tests/tkt-b4a7ddc83f.eagle.
︙︙
16
17
18
19
20
21
22

23

24

25
26

27
28


29
30
31


32
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

###############################################################################

source [file join $path common.eagle]
runSQLiteTestPrologue

###############################################################################


runTest {test tkt-b4a7ddc83f-1.1 {logging shutdown, step 1} -setup [subst {

  set fileName tkt-b4a7ddc83f-1.1.db

  set ::path {$::path}
  set ::test_configuration {$::test_configuration}

  source [file join $::path common.eagle]
}] -body {


  package require EagleTest
  tryLoadAssembly System.Data.SQLite.dll
  object invoke System.Data.SQLite.SQLiteLog Initialize


  setupDb $fileName
} -cleanup {
  cleanupDb $fileName
  unset -nocomplain db fileName
} -constraints {eagle monoBug28 command.sql compile.DATA\
compile.ISOLATED_INTERPRETERS System.Data.SQLite} -isolationLevel AppDomain \
-match regexp -result {^SQLiteConnection#\d+$}}


###############################################################################

runTest {test tkt-b4a7ddc83f-1.2 {logging shutdown, step 2} -setup [subst {
  set fileName tkt-b4a7ddc83f-1.2.db
  set ::path {$::path}
  set ::test_configuration {$::test_configuration}
  source [file join $::path common.eagle]
}] -body {
  package require EagleTest
  tryLoadAssembly System.Data.SQLite.dll
  object invoke System.Data.SQLite.SQLiteLog Initialize
  setupDb $fileName
} -cleanup {
  cleanupDb $fileName
  unset -nocomplain db fileName
} -constraints {eagle monoBug28 command.sql compile.DATA\
compile.ISOLATED_INTERPRETERS System.Data.SQLite} -isolationLevel AppDomain \
-match regexp -result {^SQLiteConnection#\d+$}}

###############################################################################

runSQLiteTestEpilogue
runTestEpilogue








>
|
>
|
>
|
|
>
|
|
>
>
|
|
|
>
>
|
|
|
|
|

|
>



<
<
<
<
<
<
<
<
<
<
<
<
|
<
<
<






16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50












51



52
53
54
55
56

###############################################################################

source [file join $path common.eagle]
runSQLiteTestPrologue

###############################################################################

for {set i 1} {$i < 3} {incr i} {
  runTest {test tkt-b4a7ddc83f-1.$i {logging shutdown} -setup [subst {
    set appDomainId(1) [object invoke AppDomain.CurrentDomain Id]
    set fileName tkt-b4a7ddc83f-1.$i.db

    set ::path {$::path}
    set ::test_configuration {$::test_configuration}

    source [file join $::path common.eagle]
  }] -body {
    set appDomainId(2) [object invoke AppDomain.CurrentDomain Id]

    package require EagleTest
    tryLoadAssembly System.Data.SQLite.dll
    object invoke System.Data.SQLite.SQLiteLog Initialize

    list $appDomainId(1) $appDomainId(2) \
        [expr {$appDomainId(1) != $appDomainId(2)}] [setupDb $fileName]
  } -cleanup {
    cleanupDb $fileName
    unset -nocomplain appDomainId db fileName
  } -constraints {eagle monoBug28 command.sql compile.DATA\
compile.ISOLATED_INTERPRETERS System.Data.SQLite} -isolationLevel AppDomain \
-match regexp -result {^\d+ \d+ True SQLiteConnection#\d+$}}
}

###############################################################################













unset -nocomplain i




###############################################################################

runSQLiteTestEpilogue
runTestEpilogue