System.Data.SQLite

Check-in [10f4be9ed4]
Login

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

Overview
Comment:Update test case for [b4a7ddc83f].
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 10f4be9ed44181e006a4ab362b3fac078d86c33b
User & Date: mistachkin 2011-07-21 17:15:33.747
Context
2011-07-21
17:18
Preliminary fix for [b4a7ddc83f], shutdown the SQLite native interface when the AppDomain is being unloaded. check-in: 1d024437e5 user: mistachkin tags: trunk
17:15
Update test case for [b4a7ddc83f]. check-in: 10f4be9ed4 user: mistachkin tags: trunk
04:05
Add preliminary test cases for ticket [b4a7ddc83f]. check-in: 1684f669ef user: mistachkin tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to Tests/tkt-b4a7ddc83f.eagle.
︙︙
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
63
64
65
66

}] -body {
  package require EagleTest
  tryLoadAssembly System.Data.SQLite.dll
  object invoke System.Data.SQLite.SQLiteLog Initialize
  setupDb $fileName
} -cleanup {
  cleanupDb $fileName

} -constraints {eagle monoBug28 command.sql compile.DATA\
compile.ISOLATED_INTERPRETERS System.Data.SQLite} -isolationLevel AppDomain \
-result {}}

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

runTest {test tkt-b4a7ddc83f-1.2 {initialization/shutdown} -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 Interpreter.GetActive Interactive True
  debug break

  object invoke System.Data.SQLite.SQLiteLog Initialize
  setupDb $fileName
} -cleanup {
  cleanupDb $fileName

} -constraints {eagle monoBug28 command.sql compile.DATA\
compile.ISOLATED_INTERPRETERS System.Data.SQLite} -isolationLevel AppDomain \
-result {}}

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

runSQLiteTestEpilogue
runTestEpilogue








>


|







|



<
<
<
<




>


|






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
63
64

}] -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 {initialization/shutdown} -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