System.Data.SQLite
Check-in [ed3d2802dd]
Not logged in

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

Overview
Comment:More corrections to the test suite infrastructure.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: ed3d2802ddefa5aca877f03b34a3aad23fd24eb5
User & Date: mistachkin 2018-08-14 05:14:18
Context
2018-08-16
05:47
For the primary NuGet package, use the framework-specific 'runtimes' meta-directory instead of relying on MSBuild targets to copy interop assemblies for the .NET Standard 2.0. Candidate fix for tickets [d292f2e23d] and [c438a5b5b9]. check-in: e1484cb4ad user: mistachkin tags: trunk
2018-08-14
05:14
More corrections to the test suite infrastructure. check-in: ed3d2802dd user: mistachkin tags: trunk
04:55
Minor cleanup. check-in: b1d4a5a75c user: mistachkin tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to Externals/Eagle/lib/Eagle1.0/vendor.eagle.

    30     30   # NOTE: Use our own namespace here because even though we do not directly
    31     31   #       support namespaces ourselves, we do not want to pollute the global
    32     32   #       namespace if this script actually ends up being evaluated in Tcl.
    33     33   #
    34     34   namespace eval ::Eagle {
    35     35     if {[isEagle]} then {
    36     36       proc checkForVendorQuiet { {name ""} } {
    37         -      if {[info exists ::env(checkForVendorQuiet)]} then {
    38         -        return true
    39         -      }
    40         -
    41         -      if {[string length $name] > 0} then {
    42         -        set envVarName [appendArgs quiet [string toupper \
    43         -            [string index $name 0]] [string range $name 1 end]]
    44         -
    45         -        if {[info exists ::env($envVarName)]} then {
           37  +      if {![interp issafe]} then {
           38  +        if {[info exists ::env(checkForVendorQuiet)]} then {
    46     39             return true
    47     40           }
           41  +
           42  +        if {[string length $name] > 0} then {
           43  +          set envVarName [appendArgs quiet [string toupper \
           44  +              [string index $name 0]] [string range $name 1 end]]
           45  +
           46  +          if {[info exists ::env($envVarName)]} then {
           47  +            return true
           48  +          }
           49  +        }
    48     50         }
    49     51   
    50     52         return false
    51     53       }
    52     54   
    53     55       proc checkForTestOverrides { channel varNames quiet } {
    54     56         set result 0
................................................................................
   463    465       set no(emitSharedFlagsIfNone) 1
   464    466       set no(emitGlobalFlagsIfNone) 1
   465    467       set no(emitCombinedFlagsIfNone) 1
   466    468   
   467    469       #
   468    470       # NOTE: Force use of the native library pre-loader when applicable.
   469    471       #
   470         -    if {[isWindows]} then {
          472  +    if {![interp issafe] && [isWindows]} then {
   471    473         set no(deleteSqliteImplicitNativeFiles) 1
   472    474         set no(copySqliteImplicitNativeFiles) 1
   473    475       }
   474    476     }
   475    477   }
   476    478   
   477    479   ###############################################################################
   478    480   ############################### END VENDOR CODE ###############################
   479    481   ###############################################################################