Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Update Eagle script library in externals to the latest trunk code. Move the test data files into their own sub-directory. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
ed5dcaba0f1190c44d5aa7276154c4f2 |
User & Date: | mistachkin 2014-07-19 06:16:38.401 |
Context
2014-07-19
| ||
06:27 | Add proper test constraint handling for the 'wal.db' and 'nonWal.db' test data files. check-in: b0d4efd98b user: mistachkin tags: trunk | |
06:16 | Update Eagle script library in externals to the latest trunk code. Move the test data files into their own sub-directory. check-in: ed5dcaba0f user: mistachkin tags: trunk | |
00:22 | Fix line endings. check-in: 413872c668 user: mistachkin tags: trunk | |
Changes
Changes to Externals/Eagle/lib/Eagle1.0/init.eagle.
︙ | ︙ | |||
1137 1138 1139 1140 1141 1142 1143 | # NOTE: Build the necessary arguments for the download. # set args [getFetchUpdateArgs $baseUri $patchLevel $type \ $directory $extension] if {[llength $args] > 0} then { # | | < > > > | > > > > > | | < | | > | 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 | # NOTE: Build the necessary arguments for the download. # set args [getFetchUpdateArgs $baseUri $patchLevel $type \ $directory $extension] if {[llength $args] > 0} then { # # NOTE: Start trusting ONLY our self-signed SSL certificate. # set trusted true if {[lindex [uri softwareupdates] end] eq "untrusted"} then { uri softwareupdates true } else { set trusted false; # NOTE: Already trusted. } try { # # NOTE: Download the file from the web site. # eval uri download $args; # synchronous. } finally { if {$trusted && \ [lindex [uri softwareupdates] end] eq "trusted"} then { # # NOTE: Stop trusting ONLY our self-signed SSL certificate. # uri softwareupdates false } } # # NOTE: Return a result indicating what was done. # return [appendArgs "downloaded URI " [lindex $args 0] \ " to directory \"" $directory \"] |
︙ | ︙ | |||
1180 1181 1182 1183 1184 1185 1186 | } eval $command &; exit -force } proc getUpdateData { uri } { # | | < > > > | > > > > > | | < | | > | < > > > | > > > > > | | < | | > | 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 | } eval $command &; exit -force } proc getUpdateData { uri } { # # NOTE: Start trusting ONLY our own self-signed SSL certificate. # set trusted true if {[lindex [uri softwareupdates] end] eq "untrusted"} then { uri softwareupdates true } else { set trusted false; # NOTE: Already trusted. } try { # # NOTE: Download the tag file from the web site. # return [uri download -inline $uri]; # synchronous. } finally { if {$trusted && \ [lindex [uri softwareupdates] end] eq "trusted"} then { # # NOTE: Stop trusting ONLY our own self-signed SSL certificate. # uri softwareupdates false } } } proc getUpdateScriptData { uri } { # # NOTE: Start trusting ONLY our own self-signed SSL certificate. # set trusted true if {[lindex [uri softwareupdates] end] eq "untrusted"} then { uri softwareupdates true } else { set trusted false; # NOTE: Already trusted. } try { # # NOTE: Download the script file from the web site. # return [interp readorgetscriptfile $uri]; # synchronous. } finally { if {$trusted && \ [lindex [uri softwareupdates] end] eq "trusted"} then { # # NOTE: Stop trusting ONLY our own self-signed SSL certificate. # uri softwareupdates false } } } # # NOTE: This proc is used to check for new versions -OR- new update # scripts for the runtime when a user executes the interactive # "#check" command. To disable this functionality, simply |
︙ | ︙ |
Changes to Externals/Eagle/lib/Eagle1.0/test.eagle.
︙ | ︙ | |||
483 484 485 486 487 488 489 | # # TODO: Add more support for standard tcltest options here. # set options [list \ -breakOnLeak -configuration -constraints -exitOnComplete -file \ -logFile -machine -match -no -notFile -platform -postTest -preTest \ | > | | 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 | # # TODO: Add more support for standard tcltest options here. # set options [list \ -breakOnLeak -configuration -constraints -exitOnComplete -file \ -logFile -machine -match -no -notFile -platform -postTest -preTest \ -randomOrder -skip -startFile -stopFile -stopOnFailure -suffix \ -suite -tclsh -threshold] foreach {name value} $args { # # NOTE: Use the [tqputs] command here just in case the test log file # has not been setup yet (i.e. by default, this procedure is # almost always called by the test prologue file prior to the # test log file having been setup and we do not want to just |
︙ | ︙ | |||
1629 1630 1631 1632 1633 1634 1635 | if {[llength statistics] > 0} then { tputs $channel [appendArgs "---- types of leaks detected: " \ [formatListAsDict $statistics] \n] } } } | | > | 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 | if {[llength statistics] > 0} then { tputs $channel [appendArgs "---- types of leaks detected: " \ [formatListAsDict $statistics] \n] } } } proc runAllTests { channel path fileNames skipFileNames startFileName stopFileName } { # # NOTE: Are we configured to run the test files in random order? # if {[isRandomOrder]} then { set fileNames [lshuffle $fileNames] } |
︙ | ︙ | |||
1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 | if {$percent != $lastPercent} then { reportTestPercent $channel $percent \ $total [llength $failed] [llength $leaked] set lastPercent $percent } # # NOTE: Skipping over any file name that matches a pattern in the # list of file names to skip. # if {[inverseLsearchGlob false $skipFileNames \ [file tail $fileName]] == -1} then { # # NOTE: Does the file name contain directory information? # if {[string length [file dirname $fileName]] <= 1} then { # # NOTE: If not, assume it is under the supplied test path. # set fileName [file join $path $fileName] } # | > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | | | 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 | if {$percent != $lastPercent} then { reportTestPercent $channel $percent \ $total [llength $failed] [llength $leaked] set lastPercent $percent } # # NOTE: If the starting file name has been specified by the caller, # skip over all the file names before it. # if {[string length $startFileName] > 0} then { if {[file tail $fileName] eq [file tail $startFileName]} then { # # NOTE: Now that we found the starting test file name, do not # skip any more test files. # set startFileName "" } else { # # NOTE: We have not found the starting test file name yet, skip # over this test file. # continue } } # # NOTE: If the stopping file name has been specified by the caller, # skip over all the file names after it. # if {[string length $stopFileName] > 0} then { if {[file tail $fileName] eq [file tail $stopFileName]} then { # # NOTE: Now that we found the stopping test file name, do not # run any more test files. # set stopFileName "" # # NOTE: This will terminate the loop right after the test file # cleanup code (i.e. at the bottom of the loop). # set stop true } } # # NOTE: Skipping over any file name that matches a pattern in the # list of file names to skip. # if {[inverseLsearchGlob false $skipFileNames \ [file tail $fileName]] == -1} then { # # NOTE: Does the file name contain directory information? # if {[string length [file dirname $fileName]] <= 1} then { # # NOTE: If not, assume it is under the supplied test path. # set fileName [file join $path $fileName] } # # NOTE: The "magic" pattern we are looking for to determine if # a given file is part of the formal test suite. # set pattern {^(\s)*runTest .*$} # # NOTE: Skip files that are not part of the test suite. # set data [readFile $fileName] |
︙ | ︙ |
Changes to Externals/Eagle/lib/Eagle1.0/vendor.eagle.
1 2 3 4 5 | ############################################################################### # # vendor.eagle -- # # Extensible Adaptable Generalized Logic Engine (Eagle) | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 | ############################################################################### # # vendor.eagle -- # # Extensible Adaptable Generalized Logic Engine (Eagle) # Vendor Initialization File for System.Data.SQLite # # Copyright (c) 2007-2012 by Joe Mistachkin. All rights reserved. # # See the file "license.terms" for information on usage and redistribution of # this file, and for a DISCLAIMER OF ALL WARRANTIES. # # RCS: @(#) $Id: $ |
︙ | ︙ |
Changes to Externals/Eagle/lib/Test1.0/all.eagle.
︙ | ︙ | |||
52 53 54 55 56 57 58 | set no(epilogue.eagle) true set test_time [time { runAllTests $test_channel $test_path \ [getTestFiles [list $test_path] $test_flags(-file) \ $test_flags(-notFile)] \ [list [file tail [info script]] *.tcl pkgIndex.eagle \ | | > | 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 | set no(epilogue.eagle) true set test_time [time { runAllTests $test_channel $test_path \ [getTestFiles [list $test_path] $test_flags(-file) \ $test_flags(-notFile)] \ [list [file tail [info script]] *.tcl pkgIndex.eagle \ constraints.eagle epilogue.eagle prologue.eagle] \ $test_flags(-startFile) $test_flags(-stopFile) }] tputs $test_channel [appendArgs "---- all tests completed in " $test_time \n] unset test_time unset no(epilogue.eagle) unset no(prologue.eagle) |
︙ | ︙ |
Changes to Externals/Eagle/lib/Test1.0/constraints.eagle.
︙ | ︙ | |||
31 32 33 34 35 36 37 | DEBUGGER DEBUGGER_ARGUMENTS DEBUG_TRACE DEBUG_WRITE DRAWING DYNAMIC \ EAGLE EMBEDDED_LIBRARY EXECUTE_CACHE EXPRESSION_FLAGS FAST_ERRORCODE \ FAST_ERRORINFO HAVE_SIZEOF HISTORY IA64 INTERACTIVE_COMMANDS \ INTERNALS_VISIBLE_TO ISOLATED_INTERPRETERS ISOLATED_PLUGINS LIBRARY \ LICENSING LIST_CACHE MONO MONO_BUILD MONO_HACKS MONO_LEGACY \ NATIVE NATIVE_PACKAGE NATIVE_UTILITY NATIVE_UTILITY_BSTR NETWORK \ NET_20 NET_20_FAST_ENUM NET_20_ONLY NET_20_SP1 NET_20_SP2 NET_30 \ | | | | | | | | | | 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 | DEBUGGER DEBUGGER_ARGUMENTS DEBUG_TRACE DEBUG_WRITE DRAWING DYNAMIC \ EAGLE EMBEDDED_LIBRARY EXECUTE_CACHE EXPRESSION_FLAGS FAST_ERRORCODE \ FAST_ERRORINFO HAVE_SIZEOF HISTORY IA64 INTERACTIVE_COMMANDS \ INTERNALS_VISIBLE_TO ISOLATED_INTERPRETERS ISOLATED_PLUGINS LIBRARY \ LICENSING LIST_CACHE MONO MONO_BUILD MONO_HACKS MONO_LEGACY \ NATIVE NATIVE_PACKAGE NATIVE_UTILITY NATIVE_UTILITY_BSTR NETWORK \ NET_20 NET_20_FAST_ENUM NET_20_ONLY NET_20_SP1 NET_20_SP2 NET_30 \ NET_35 NET_40 NET_45 NET_451 NET_452 NON_WORKING_CODE NOTIFY \ NOTIFY_ACTIVE NOTIFY_ARGUMENTS NOTIFY_GLOBAL NOTIFY_OBJECT OBSOLETE \ OFFICIAL PARSE_CACHE PATCHLEVEL POLICY_TRACE PREVIOUS_RESULT \ RANDOMIZE_ID REMOTING SAMPLE SERIALIZATION SHARED_ID_POOL SHELL \ SOURCE_ID SOURCE_TIMESTAMP STATIC TCL TCL_KITS TCL_THREADED \ TCL_THREADS TCL_UNICODE TCL_WRAPPER TEST THREADING THROW_ON_DISPOSED \ TRACE TYPE_CACHE UNIX VERBOSE WEB WINDOWS WINFORMS WIX_30 WIX_35 \ WIX_36 WIX_37 WIX_38 X64 X86 XML] } proc getKnownMonoVersions {} { # # NOTE: This job of this procedure is to return the list of "known" # versions of Mono supported by the test suite infrastructure. # |
︙ | ︙ |
Changes to Externals/Eagle/lib/Test1.0/prologue.eagle.
︙ | ︙ | |||
36 37 38 39 40 41 42 43 44 45 46 47 48 49 | # # NOTE: Set the location of the test suite, if necessary. # if {![info exists test_path]} then { set test_path [file normalize [file dirname [info script]]] } # # NOTE: Set the location of the base Eagle directory, if # necessary. # if {![info exists base_path]} then { # # NOTE: Start out going up one level and check for a "lib" | > > > > > > > | 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 | # # NOTE: Set the location of the test suite, if necessary. # if {![info exists test_path]} then { set test_path [file normalize [file dirname [info script]]] } # # NOTE: Set the location of the test suite data, if necessary. # if {![info exists test_data_path]} then { set test_data_path [file join $test_path data] } # # NOTE: Set the location of the base Eagle directory, if # necessary. # if {![info exists base_path]} then { # # NOTE: Start out going up one level and check for a "lib" |
︙ | ︙ | |||
149 150 151 152 153 154 155 | # NOTE: Set the primary package path, if necessary. # if {![info exists test_package_path]} then { set test_package_path [file join $base_path lib] } # | | | | 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 | # NOTE: Set the primary package path, if necessary. # if {![info exists test_package_path]} then { set test_package_path [file join $base_path lib] } # # NOTE: Make sure our primary package path is part of the auto-path. # if {[lsearch -exact $auto_path $test_package_path] == -1} then { lappend auto_path $test_package_path } # # NOTE: Make sure our test package path is part of the auto-path. # if {[lsearch -exact $auto_path $test_path] == -1} then { lappend auto_path $test_path } ############################################################################# |
︙ | ︙ | |||
265 266 267 268 269 270 271 272 273 274 275 276 277 278 | set test_flags(-suite) ""; # test suite name, default to empty. set test_flags(-machine) ""; # machine architecture, default to empty. set test_flags(-platform) ""; # build platform, default to empty. set test_flags(-configuration) ""; # build configuration, default to empty. set test_flags(-suffix) ""; # build suffix, default to empty. set test_flags(-file) [list *.eagle]; # default to running all test files. set test_flags(-notFile) [list l.*.eagle]; # COMPAT: Tcl. set test_flags(-match) [list *]; # default to running all tests. set test_flags(-skip) [list]; # default to skipping no tests. set test_flags(-constraints) [list]; # default to no manual constraints. set test_flags(-logFile) ""; # default to using standard log file naming. set test_flags(-threshold) ""; # default to requiring all tests to pass. set test_flags(-randomOrder) ""; # default to deterministic order. set test_flags(-breakOnLeak) ""; # default to continue on leak. | > > | 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 | set test_flags(-suite) ""; # test suite name, default to empty. set test_flags(-machine) ""; # machine architecture, default to empty. set test_flags(-platform) ""; # build platform, default to empty. set test_flags(-configuration) ""; # build configuration, default to empty. set test_flags(-suffix) ""; # build suffix, default to empty. set test_flags(-file) [list *.eagle]; # default to running all test files. set test_flags(-notFile) [list l.*.eagle]; # COMPAT: Tcl. set test_flags(-startFile) ""; # start running at the first test file. set test_flags(-stopFile) ""; # stop running after the last test file. set test_flags(-match) [list *]; # default to running all tests. set test_flags(-skip) [list]; # default to skipping no tests. set test_flags(-constraints) [list]; # default to no manual constraints. set test_flags(-logFile) ""; # default to using standard log file naming. set test_flags(-threshold) ""; # default to requiring all tests to pass. set test_flags(-randomOrder) ""; # default to deterministic order. set test_flags(-breakOnLeak) ""; # default to continue on leak. |
︙ | ︙ | |||
703 704 705 706 707 708 709 710 711 712 713 714 715 716 | $test_flags(-file) \n] } if {[llength $test_flags(-notFile)] > 0} then { tputs $test_channel [appendArgs "---- skipping test files that match: " \ $test_flags(-notFile) \n] } if {[llength $test_flags(-match)] > 0} then { tputs $test_channel [appendArgs "---- running tests that match: " \ $test_flags(-match) \n] } if {[llength $test_flags(-skip)] > 0} then { | > > > > > > > > > > | 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 | $test_flags(-file) \n] } if {[llength $test_flags(-notFile)] > 0} then { tputs $test_channel [appendArgs "---- skipping test files that match: " \ $test_flags(-notFile) \n] } if {[llength $test_flags(-startFile)] > 0} then { tputs $test_channel [appendArgs "---- starting with test file: " \ $test_flags(-startFile) \n] } if {[llength $test_flags(-stopFile)] > 0} then { tputs $test_channel [appendArgs "---- stopping after test file: " \ $test_flags(-stopFile) \n] } if {[llength $test_flags(-match)] > 0} then { tputs $test_channel [appendArgs "---- running tests that match: " \ $test_flags(-match) \n] } if {[llength $test_flags(-skip)] > 0} then { |
︙ | ︙ | |||
730 731 732 733 734 735 736 | tputs $test_channel [appendArgs "---- binary path: \"" \ $bin_path \"\n] tputs $test_channel [appendArgs "---- library path: \"" \ $lib_path \"\n] | | > > > | | 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 | tputs $test_channel [appendArgs "---- binary path: \"" \ $bin_path \"\n] tputs $test_channel [appendArgs "---- library path: \"" \ $lib_path \"\n] tputs $test_channel [appendArgs "---- test script files located in: \"" \ $test_path \"\n] tputs $test_channel [appendArgs "---- test data files located in: \"" \ $test_data_path \"\n] tputs $test_channel [appendArgs "---- running in: \"" \ [pwd] \"\n] tputs $test_channel [appendArgs "---- temporary files stored in: \"" \ [getTemporaryPath] \"\n] tputs $test_channel [appendArgs "---- native Tcl shell: " \ [expr {[info exists test_tclsh] && [string length $test_tclsh] > 0 ? \ |
︙ | ︙ | |||
961 962 963 964 965 966 967 968 969 970 971 972 973 974 | # post-processed using [subst], per request. This allows # the [custom] test database connection string to contain # references to the other test database variables setup # by this test prologue. # set test_database [subst $test_database] } # # NOTE: Can we access the configured test database? # checkForDatabase $test_channel $test_database_type $test_database unset password user timeout database server | > > > > > > > > > > | 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 | # post-processed using [subst], per request. This allows # the [custom] test database connection string to contain # references to the other test database variables setup # by this test prologue. # set test_database [subst $test_database] } # # NOTE: Set the test database table, if necessary. # if {![info exists test_database_table]} then { # # NOTE: Use the default database table. # set test_database_table eagle_sql_test_ok_to_delete } # # NOTE: Can we access the configured test database? # checkForDatabase $test_channel $test_database_type $test_database unset password user timeout database server |
︙ | ︙ | |||
2028 2029 2030 2031 2032 2033 2034 | # Eagle core test suite been disabled? # if {![info exists no(core)] && ![info exists no(checkForFile)]} then { # # NOTE: For tests "benchmark-1.3[89]" and "benchmark-1.40". # if {![info exists no(benchmark.txt)]} then { | | | > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | | | | | | | | | | | | > | > | | | | 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 | # Eagle core test suite been disabled? # if {![info exists no(core)] && ![info exists no(checkForFile)]} then { # # NOTE: For tests "benchmark-1.3[89]" and "benchmark-1.40". # if {![info exists no(benchmark.txt)]} then { checkForFile $test_channel [file join $test_data_path benchmark.txt] } # # NOTE: For test "garuda-1.1". # if {![info exists no(pkgAll.tcl)]} then { checkForFile $test_channel [file join $base_path Native Package \ Tests all.tcl] pkgAll.tcl } # # NOTE: For tests "subst-1.*". # if {![info exists no(bad_subst.txt)]} then { checkForFile $test_channel [file join $test_data_path bad_subst.txt] } # # NOTE: This is not currently used by any tests. # if {![info exists no(evaluate.eagle)]} then { checkForFile $test_channel [file join $test_data_path evaluate.eagle] } # # NOTE: This is not currently used by any tests. # if {![info exists no(substitute.eagle)]} then { checkForFile $test_channel [file join $test_data_path substitute.eagle] } # # NOTE: This is not currently used by any tests. # if {![info exists no(unicode_bom.txt)]} then { checkForFile $test_channel [file join $test_data_path unicode_bom.txt] } # # NOTE: This is not currently used by any tests. # if {![info exists no(unicode_no_bom.txt)]} then { checkForFile $test_channel [file join $test_data_path unicode_no_bom.txt] } # # NOTE: This is not currently used by any tests. # if {![info exists no(utf8.txt)]} then { checkForFile $test_channel [file join $test_data_path utf8.txt] } # # NOTE: For tests "fileIO-1.*". # if {![info exists no(file.dat)]} then { checkForFile $test_channel [file join $test_data_path file.dat] } # # NOTE: For test "garbage-1.1". # if {![info exists no(garbage.txt)]} then { checkForFile $test_channel [file join $test_data_path garbage.txt] } # # NOTE: For tests "xaml-1.*". # if {![info exists no(test.png)]} then { checkForFile $test_channel [file join $test_data_path test.png] } # # NOTE: For test "socket-1.2". # if {![info exists no(client.tcl)]} then { checkForFile $test_channel [file join $test_data_path client.tcl] } # # NOTE: For test "tclLoad-1.2". # if {![info exists no(tcl_unload.tcl)]} then { checkForFile $test_channel [file join $test_data_path tcl_unload.tcl] } # # NOTE: For test "basic-1.4". # if {![info exists no(read.eagle)]} then { checkForFile $test_channel [file join $test_data_path read.eagle] } # # NOTE: For test "basic-1.5". # if {![info exists no(read2.eagle)]} then { checkForFile $test_channel [file join $test_data_path read2.eagle] } # # NOTE: For test "basic-1.6". # if {![info exists no(read3.eagle)]} then { checkForFile $test_channel [file join $test_data_path read3.eagle] } # # NOTE: For test "basic-1.7". # if {![info exists no(read4.eagle)]} then { checkForFile $test_channel [file join $test_data_path read4.eagle] } # # NOTE: For test "infoScript-1.1". # if {![info exists no(script.eagle)]} then { checkForFile $test_channel [file join $test_data_path script.eagle] } # # NOTE: For test "basic-1.1". # if {![info exists no(source.eagle)]} then { checkForFile $test_channel [file join $test_data_path source.eagle] } # # NOTE: For test "basic-1.2". # if {![info exists no(unbalanced_brace.eagle)]} then { checkForFile $test_channel [file join \ $test_data_path unbalanced_brace.eagle] } # # NOTE: For test "basic-1.3". # if {![info exists no(unbalanced_brace2.eagle)]} then { checkForFile $test_channel [file join \ $test_data_path unbalanced_brace2.eagle] } # # NOTE: For tests "excel-2.*". # if {![info exists no(test.xls)]} then { checkForFile $test_channel [file join $test_data_path test.xls] } # # NOTE: For test "proc-1.9". # if {![info exists no(testProcs.tcl)]} then { checkForFile $test_channel [file join $test_data_path testProcs.tcl] } # # NOTE: For test "interp-1.10". # if {![info exists no(settings.xml)]} then { checkForFile $test_channel [file join $test_data_path settings.xml] } # # NOTE: For tests "load-1.1.*". # if {![info exists no(Plugin.dll)]} then { checkForFile $test_channel [file join $lib_path Plugin1.0 Plugin.dll] |
︙ | ︙ | |||
2231 2232 2233 2234 2235 2236 2237 | } if {![info exists no(System.Data.SQLite.dll)]} then { checkForFile $test_channel [file join $bin_path System.Data.SQLite.dll] } if {![info exists no(test.sqlite3)]} then { | | | 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 | } if {![info exists no(System.Data.SQLite.dll)]} then { checkForFile $test_channel [file join $bin_path System.Data.SQLite.dll] } if {![info exists no(test.sqlite3)]} then { checkForFile $test_channel [file join $test_data_path test.sqlite3] } } # # NOTE: Check the core test constraints unless they have been # explicitly disabled. # |
︙ | ︙ |
Changes to Setup/verify.lst.
︙ | ︙ | |||
618 619 620 621 622 623 624 | testlinq/testlinq.2013.csproj Tests/ Tests/all.eagle Tests/authorizer.eagle Tests/backup.eagle Tests/basic.eagle Tests/common.eagle | | < | | | | | | > > > > > > > > > < | 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 | testlinq/testlinq.2013.csproj Tests/ Tests/all.eagle Tests/authorizer.eagle Tests/backup.eagle Tests/basic.eagle Tests/common.eagle Tests/data/ Tests/data/Installer_Test_Vs2005.log Tests/data/Installer_Test_Vs2008.log Tests/data/Installer_Test_Vs2010.log Tests/data/Installer_Test_Vs2012.log Tests/data/Installer_Test_Vs2013.log Tests/data/nonWal.db Tests/data/testlinq.out Tests/data/Uninstaller_Test_Vs2005.log Tests/data/Uninstaller_Test_Vs2008.log Tests/data/Uninstaller_Test_Vs2010.log Tests/data/Uninstaller_Test_Vs2012.log Tests/data/Uninstaller_Test_Vs2013.log Tests/data/wal.db Tests/empty.eagle Tests/installer.eagle Tests/pkgIndex.eagle Tests/speed.eagle Tests/stress.eagle Tests/thread.eagle Tests/tkt-00f86f9739.eagle Tests/tkt-0d5b1ef362.eagle Tests/tkt-17045010df.eagle Tests/tkt-1c456ae75f.eagle Tests/tkt-201128cc88.eagle Tests/tkt-2c630bffa7.eagle |
︙ | ︙ | |||
677 678 679 680 681 682 683 | Tests/tkt-e1b2e0f769.eagle Tests/tkt-e30b820248.eagle Tests/tkt-e47b3d8346.eagle Tests/tkt-ef2216192d.eagle Tests/tkt-f2c47a01eb.eagle Tests/tkt-f8dbab8baf.eagle Tests/tkt-fe50b8c2e8.eagle | < < < < < < | 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 | Tests/tkt-e1b2e0f769.eagle Tests/tkt-e30b820248.eagle Tests/tkt-e47b3d8346.eagle Tests/tkt-ef2216192d.eagle Tests/tkt-f2c47a01eb.eagle Tests/tkt-f8dbab8baf.eagle Tests/tkt-fe50b8c2e8.eagle Tests/version.eagle Tests/vtab.eagle tools/ tools/install/ tools/install/Installer.2005.csproj tools/install/Installer.2008.csproj tools/install/Installer.2010.csproj tools/install/Installer.2012.csproj tools/install/Installer.2013.csproj |
︙ | ︙ |
Changes to Tests/all.eagle.
︙ | ︙ | |||
44 45 46 47 48 49 50 | # # NOTE: Run all the unit tests. # set test_time [time { runAllTests $test_channel $path \ [getTestFiles [list $path] $test_flags(-file) $test_flags(-notFile)] \ [list [file tail [info script]] *.tcl pkgIndex.eagle common.eagle \ | | > | 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 | # # NOTE: Run all the unit tests. # set test_time [time { runAllTests $test_channel $path \ [getTestFiles [list $path] $test_flags(-file) $test_flags(-notFile)] \ [list [file tail [info script]] *.tcl pkgIndex.eagle common.eagle \ constraints.eagle empty.eagle epilogue.eagle prologue.eagle] \ $test_flags(-startFile) $test_flags(-stopFile) }] # # NOTE: Run the local test epilogue, if any. # if {[file exists [file join $path epilogue.eagle]]} then { source [file join $path epilogue.eagle] |
︙ | ︙ |
Changes to Tests/basic.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set entityFrameworkDllFile [getBuildFileName EntityFramework.dll] set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testExeFile [getBuildFileName test.exe] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set testLinqOutFile [file nativename [file join \ [getSQLiteTestDataPath] testlinq.out]] set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $entityFrameworkDllFile]]]} then { checkForFile $test_channel $entityFrameworkDllFile |
︙ | ︙ |
Changes to Tests/common.eagle.
︙ | ︙ | |||
299 300 301 302 303 304 305 306 307 308 309 310 311 312 | # # NOTE: No path is available, return an empty string. This point # should not be reached. # return "" } } proc isRunningWoW64 {} { # # NOTE: For now, just use the existing test constraint for detecting # a WoW64 process. # return [haveConstraint wow64] | > > > > > > > > > | 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 | # # NOTE: No path is available, return an empty string. This point # should not be reached. # return "" } } proc getSQLiteTestDataPath {} { # # NOTE: Figure out the directory where all the test data files should # be located. This should be the "data" directory beneath the # directory containing the actual test scripts. # return [file join $::path data] } proc isRunningWoW64 {} { # # NOTE: For now, just use the existing test constraint for detecting # a WoW64 process. # return [haveConstraint wow64] |
︙ | ︙ |
Name change from Tests/Installer_Test_Vs2005.log to Tests/data/Installer_Test_Vs2005.log.
︙ | ︙ |
Name change from Tests/Installer_Test_Vs2008.log to Tests/data/Installer_Test_Vs2008.log.
︙ | ︙ |
Name change from Tests/Installer_Test_Vs2010.log to Tests/data/Installer_Test_Vs2010.log.
︙ | ︙ |
Name change from Tests/Installer_Test_Vs2012.log to Tests/data/Installer_Test_Vs2012.log.
︙ | ︙ |
Name change from Tests/Installer_Test_Vs2013.log to Tests/data/Installer_Test_Vs2013.log.
︙ | ︙ |
Name change from Tests/Uninstaller_Test_Vs2005.log to Tests/data/Uninstaller_Test_Vs2005.log.
︙ | ︙ |
Name change from Tests/Uninstaller_Test_Vs2008.log to Tests/data/Uninstaller_Test_Vs2008.log.
︙ | ︙ |
Name change from Tests/Uninstaller_Test_Vs2010.log to Tests/data/Uninstaller_Test_Vs2010.log.
︙ | ︙ |
Name change from Tests/Uninstaller_Test_Vs2012.log to Tests/data/Uninstaller_Test_Vs2012.log.
︙ | ︙ |
Name change from Tests/Uninstaller_Test_Vs2013.log to Tests/data/Uninstaller_Test_Vs2013.log.
︙ | ︙ |
Name change from Tests/nonWal.db to Tests/data/nonWal.db.
cannot compute difference between binary files
Name change from Tests/testlinq.out to Tests/data/testlinq.out.
︙ | ︙ |
Name change from Tests/wal.db to Tests/data/wal.db.
cannot compute difference between binary files
Changes to Tests/installer.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | | | | | | | | | | | | | | | | | | | | | | 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 63 64 65 66 67 68 69 70 71 72 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set sqliteDesignerDllFile [getBuildFileName SQLite.Designer.dll] set installerExeFile [getBuildFileName Installer.exe] # # NOTE: The various install/uninstall log files used to test the design-time # component installer. # set testInstallVs2005LogFile [file nativename [file join \ [getSQLiteTestDataPath] Installer_Test_Vs2005.log]] set testInstallVs2008LogFile [file nativename [file join \ [getSQLiteTestDataPath] Installer_Test_Vs2008.log]] set testInstallVs2010LogFile [file nativename [file join \ [getSQLiteTestDataPath] Installer_Test_Vs2010.log]] set testInstallVs2012LogFile [file nativename [file join \ [getSQLiteTestDataPath] Installer_Test_Vs2012.log]] set testInstallVs2013LogFile [file nativename [file join \ [getSQLiteTestDataPath] Installer_Test_Vs2013.log]] set testUninstallVs2005LogFile [file nativename [file join \ [getSQLiteTestDataPath] Uninstaller_Test_Vs2005.log]] set testUninstallVs2008LogFile [file nativename [file join \ [getSQLiteTestDataPath] Uninstaller_Test_Vs2008.log]] set testUninstallVs2010LogFile [file nativename [file join \ [getSQLiteTestDataPath] Uninstaller_Test_Vs2010.log]] set testUninstallVs2012LogFile [file nativename [file join \ [getSQLiteTestDataPath] Uninstaller_Test_Vs2012.log]] set testUninstallVs2013LogFile [file nativename [file join \ [getSQLiteTestDataPath] Uninstaller_Test_Vs2013.log]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $systemDataSQLiteDllFile]]]} then { checkForFile $test_channel $systemDataSQLiteDllFile |
︙ | ︙ |
Changes to Tests/speed.eagle.
︙ | ︙ | |||
69 70 71 72 73 74 75 | sql execute $db "INSERT INTO t2 (x) VALUES(1.7976931348623157e+308);" sql execute $db "INSERT INTO t3 (y) VALUES(NULL);" sql execute $db "INSERT INTO t3 (y) VALUES('1');" sql execute $db "INSERT INTO t3 (y) VALUES('1.1');" sql execute $db [appendArgs \ | | | | 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 | sql execute $db "INSERT INTO t2 (x) VALUES(1.7976931348623157e+308);" sql execute $db "INSERT INTO t3 (y) VALUES(NULL);" sql execute $db "INSERT INTO t3 (y) VALUES('1');" sql execute $db "INSERT INTO t3 (y) VALUES('1.1');" sql execute $db [appendArgs \ "INSERT INTO t3 (y) VALUES('" [string map [list ' ''] [string \ repeat [format %c [expr {int(rand() * 0x80)}]] 1048576]] "');"] sql execute $db "INSERT INTO t4 (z) VALUES(NULL);" sql execute $db "INSERT INTO t4 (z) VALUES(X'01');" sql execute $db "INSERT INTO t4 (z) VALUES(X'0123456789');" sql execute $db "INSERT INTO t4 (z) VALUES(randomblob(1048576));" } -body { set result [list] |
︙ | ︙ | |||
133 134 135 136 137 138 139 | sql execute $db "INSERT INTO t2 (x) VALUES(1.7976931348623157e+308);" sql execute $db "INSERT INTO t3 (y) VALUES(NULL);" sql execute $db "INSERT INTO t3 (y) VALUES('1');" sql execute $db "INSERT INTO t3 (y) VALUES('1.1');" sql execute $db [appendArgs \ | | | | 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 | sql execute $db "INSERT INTO t2 (x) VALUES(1.7976931348623157e+308);" sql execute $db "INSERT INTO t3 (y) VALUES(NULL);" sql execute $db "INSERT INTO t3 (y) VALUES('1');" sql execute $db "INSERT INTO t3 (y) VALUES('1.1');" sql execute $db [appendArgs \ "INSERT INTO t3 (y) VALUES('" [string map [list ' ''] [string \ repeat [format %c [expr {int(rand() * 0x80)}]] 1048576]] "');"] sql execute $db "INSERT INTO t4 (z) VALUES(NULL);" sql execute $db "INSERT INTO t4 (z) VALUES(X'01');" sql execute $db "INSERT INTO t4 (z) VALUES(X'0123456789');" sql execute $db "INSERT INTO t4 (z) VALUES(randomblob(1048576));" } -body { set result [list] |
︙ | ︙ |
Changes to Tests/tkt-00f86f9739.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set entityFrameworkDllFile [getBuildFileName EntityFramework.dll] set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $entityFrameworkDllFile]]]} then { checkForFile $test_channel $entityFrameworkDllFile |
︙ | ︙ |
Changes to Tests/tkt-448d663d11.eagle.
︙ | ︙ | |||
31 32 33 34 35 36 37 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.2 {missing journal mode, WAL db} -body { set fileName tkt-448d663d11-1.2.db | | | | 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 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.2 {missing journal mode, WAL db} -body { set fileName tkt-448d663d11-1.2.db file copy -force [file join [getSQLiteTestDataPath] wal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName "" "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName } -constraints \ {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {wal}} ############################################################################### runTest {test tkt-448d663d11-1.3 {missing journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.3.db file copy -force [file join [getSQLiteTestDataPath] nonWal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName "" "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName |
︙ | ︙ | |||
76 77 78 79 80 81 82 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.5 {'Default' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.5.db | | | | 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.5 {'Default' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.5.db file copy -force [file join [getSQLiteTestDataPath] wal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Default "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName } -constraints \ {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {wal}} ############################################################################### runTest {test tkt-448d663d11-1.6 {'Default' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.6.db file copy -force [file join [getSQLiteTestDataPath] nonWal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Default "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName |
︙ | ︙ | |||
121 122 123 124 125 126 127 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.8 {'Delete' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.8.db | | | | 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.8 {'Delete' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.8.db file copy -force [file join [getSQLiteTestDataPath] wal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Delete "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName } -constraints \ {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.9 {'Delete' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.9.db file copy -force [file join [getSQLiteTestDataPath] nonWal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Delete "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName |
︙ | ︙ | |||
218 219 220 221 222 223 224 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {wal}} ############################################################################### runTest {test tkt-448d663d11-1.15 {'Wal' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.15.db | | | | 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {wal}} ############################################################################### runTest {test tkt-448d663d11-1.15 {'Wal' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.15.db file copy -force [file join [getSQLiteTestDataPath] nonWal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Wal "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName } -constraints \ {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {wal}} ############################################################################### runTest {test tkt-448d663d11-1.16 {'Wal' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.16.db file copy -force [file join [getSQLiteTestDataPath] wal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Wal "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName |
︙ | ︙ | |||
263 264 265 266 267 268 269 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.18 {'Bad' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.18.db | | | | 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 | {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.18 {'Bad' journal mode, non-WAL db} -body { set fileName tkt-448d663d11-1.18.db file copy -force [file join [getSQLiteTestDataPath] nonWal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Bad "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName } -constraints \ {eagle monoBug28 command.sql compile.DATA SQLite System.Data.SQLite} -result \ {delete}} ############################################################################### runTest {test tkt-448d663d11-1.19 {'Bad' journal mode, WAL db} -body { set fileName tkt-448d663d11-1.19.db file copy -force [file join [getSQLiteTestDataPath] wal.db] \ [file join [getDatabaseDirectory] $fileName] setupDb $fileName Bad "" "" "" "" true false sql execute -execute scalar $db "PRAGMA journal_mode;" } -cleanup { cleanupDb $fileName unset -nocomplain db fileName |
︙ | ︙ |
Changes to Tests/tkt-59edc1018b.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $systemDataSQLiteDllFile]]]} then { checkForFile $test_channel $systemDataSQLiteDllFile |
︙ | ︙ |
Changes to Tests/tkt-8b7d179c3c.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $systemDataSQLiteDllFile]]]} then { checkForFile $test_channel $systemDataSQLiteDllFile |
︙ | ︙ |
Changes to Tests/tkt-ccfa69fc32.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $systemDataSQLiteDllFile]]]} then { checkForFile $test_channel $systemDataSQLiteDllFile |
︙ | ︙ |
Changes to Tests/tkt-da9f18d039.eagle.
︙ | ︙ | |||
17 18 19 20 21 22 23 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # | | | > > > > > | > | | 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 | package require System.Data.SQLite.Test runSQLiteTestPrologue ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set testLinqExeFile [getBuildFileName testlinq.exe] set testEf6ExeFile [getBuildFileName testef6.exe] # # NOTE: Setup the variables that refer to the various data files required by # the tests in this file. # set northwindEfDbFile [file nativename [file join \ [file dirname [file dirname [getSQLiteTestDataPath]]] testlinq \ northwindEF.db]] # # NOTE: Setup the test constraints specific to the tests in this file. # if {![haveConstraint [appendArgs file_ \ [file tail $systemDataSQLiteDllFile]]]} then { checkForFile $test_channel $systemDataSQLiteDllFile |
︙ | ︙ |
Changes to Tests/version.eagle.
︙ | ︙ | |||
53 54 55 56 57 58 59 | # set version(nuget) [appendArgs $version(major) . $version(minor) . \ $version(build) . \\d+] ############################################################################### # | | | | 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 | # set version(nuget) [appendArgs $version(major) . $version(minor) . \ $version(build) . \\d+] ############################################################################### # # NOTE: Setup the variables that refer to the various non-data files required # by the tests in this file. # set systemDataSQLiteDllFile [getBuildFileName System.Data.SQLite.dll] set systemDataSQLiteLinqDllFile [getBuildFileName System.Data.SQLite.Linq.dll] set systemDataSQLiteEf6DllFile [getBuildFileName System.Data.SQLite.EF6.dll] set sqliteDesignerDllFile [getBuildFileName SQLite.Designer.dll] set testExeFile [getBuildFileName test.exe] set testLinqExeFile [getBuildFileName testlinq.exe] |
︙ | ︙ |