Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | More test suite refinements. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | netStandard20 |
| Files: | files | file ages | folders |
| SHA1: | cdca7aec87bc7b1039dcad2d82340c69 |
| User & Date: | mistachkin 2018-04-08 12:00:16 |
Context
|
2018-04-08
| ||
| 18:29 | Pickup changes to Eagle script library in externals. check-in: 5266f14295 user: mistachkin tags: netStandard20 | |
| 12:00 | More test suite refinements. check-in: cdca7aec87 user: mistachkin tags: netStandard20 | |
| 05:08 | Add comments to document why certain tests are skipped on .NET Core. check-in: be844022a1 user: mistachkin tags: netStandard20 | |
Changes
Changes to Tests/tkt-0e48e80333.eagle.
117
118
119
120
121
122
123
124
125
126
127
128
129
130
...
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
|
moveEagleShellMdaConfig true
} -constraints {eagle dotNet testExec command.object monoBug28 command.sql\
compile.DATA SQLite System.Data.SQLite} -result {0}}
###############################################################################
runTest {test tkt-0e48e80333-1.2 {delegate MDA on pooled close} -setup {
moveEagleShellMdaConfig false
saveEagleShellEnvironment
saveMdaConfigEnvironment
setupDb [set fileName tkt-0e48e80333-1.2.db]
................................................................................
unset -nocomplain code output error scriptFileName configFileName
unset -nocomplain db fileName
restoreMdaConfigEnvironment
restoreEagleShellEnvironment
moveEagleShellMdaConfig true
} -constraints {eagle command.object monoBug28 command.sql compile.DATA SQLite\
System.Data.SQLite compileCSharp} -match regexp -result {^0 \{Ok\
System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\} 0 \d+\}$}}
###############################################################################
runSQLiteTestEpilogue
runTestEpilogue
|
>
>
>
>
>
|
|
|
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
...
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
|
moveEagleShellMdaConfig true
} -constraints {eagle dotNet testExec command.object monoBug28 command.sql\
compile.DATA SQLite System.Data.SQLite} -result {0}}
###############################################################################
#
# HACK: This test is non-portable (e.g. to Mono) due to its use of Managed
# Debugging Assistants (MDAs), which are only implemented by the full
# .NET Framework.
#
runTest {test tkt-0e48e80333-1.2 {delegate MDA on pooled close} -setup {
moveEagleShellMdaConfig false
saveEagleShellEnvironment
saveMdaConfigEnvironment
setupDb [set fileName tkt-0e48e80333-1.2.db]
................................................................................
unset -nocomplain code output error scriptFileName configFileName
unset -nocomplain db fileName
restoreMdaConfigEnvironment
restoreEagleShellEnvironment
moveEagleShellMdaConfig true
} -constraints {eagle dotNet command.object monoBug28 command.sql compile.DATA\
SQLite System.Data.SQLite compileCSharp} -match regexp -result {^0 \{Ok\
System#CodeDom#Compiler#CompilerResults#\d+ \{\} 0 \{\} 0 \d+\}$}}
###############################################################################
runSQLiteTestEpilogue
runTestEpilogue
|
Changes to lib/System.Data.SQLite/common.eagle.
4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 |
#
# NOTE: Skip trying to verify the build directory if instructed;
# otherwise, make sure it actually exists or halt the entire
# testing process if it does not exist.
#
if {![info exists ::no(verifyBuildDirectory)]} then {
#
# NOTE: At this point, the build directory MUST exist as a
# valid directory for the testing process to continue.
#
set directory [getBuildDirectory false]
if {![file exists $directory] || \
![file isdirectory $directory]} then {
#
# NOTE: Just prior to actually halting the testing process,
# add an error to the test log file.
#
tputs $::test_channel [appendArgs \
"---- could not verify build directory \"" $directory \
"\", all testing halted\n"]
#
# NOTE: Raising a script error from this point should halt
# the testing process.
#
error [appendArgs \
"could not verify build directory \"" $directory \
"\", all testing halted"]
}
}
#
# NOTE: Skip trying to copy any files if instructed.
#
if {![info exists ::no(copySqliteFiles)]} then {
|
| | | | > > > > > > > > > > > > > > > > > > > > > | | |
4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 4684 4685 4686 4687 4688 4689 4690 4691 4692 4693 4694 4695 4696 4697 4698 4699 4700 4701 4702 4703 4704 |
#
# NOTE: Skip trying to verify the build directory if instructed;
# otherwise, make sure it actually exists or halt the entire
# testing process if it does not exist.
#
if {![info exists ::no(verifyBuildDirectory)]} then {
#
# NOTE: At this point, the build directories MUST exist for
# the testing process to continue.
#
set directory [getBuildDirectory false]
if {![file exists $directory] || \
![file isdirectory $directory]} then {
#
# NOTE: Just prior to actually halting the testing process,
# add an error to the test log file.
#
tputs $::test_channel [appendArgs \
"---- could not verify native build directory \"" \
$directory "\", all testing halted\n"]
#
# NOTE: Raising a script error from this point should halt
# the testing process.
#
error [appendArgs \
"could not verify native build directory \"" \
$directory "\", all testing halted"]
}
set directory [getBuildDirectory true]
if {![file exists $directory] || \
![file isdirectory $directory]} then {
#
# NOTE: Just prior to actually halting the testing process,
# add an error to the test log file.
#
tputs $::test_channel [appendArgs \
"---- could not verify managed build directory \"" \
$directory "\", all testing halted\n"]
#
# NOTE: Raising a script error from this point should halt
# the testing process.
#
error [appendArgs \
"could not verify managed build directory \"" \
$directory "\", all testing halted"]
}
}
#
# NOTE: Skip trying to copy any files if instructed.
#
if {![info exists ::no(copySqliteFiles)]} then {
|