System.Data.SQLite

Check-in [4578c9236b]
Login

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

Overview
Comment:Cherrypick of [2c31a6967460b852], test suite helper procedure fixes.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | branch-1.0.105
Files: files | file ages | folders
SHA1: 4578c9236b7afb294583954dabedfb7e940ac6a7
User & Date: mistachkin 2017-05-11 15:37:36.373
Context
2017-05-11
15:43
Cherrypick of [cee7126f56f28d0e], fix caching of 'No_SQLiteConnectionNewParser' and 'DefaultFlags_SQLiteConnection'. check-in: 362b7933d5 user: mistachkin tags: branch-1.0.105
15:37
Cherrypick of [2c31a6967460b852], test suite helper procedure fixes. check-in: 4578c9236b user: mistachkin tags: branch-1.0.105
15:36
Cherrypick of [9b146be3f9aef0c3] and [ece910dd8df8ce5f], the Int32.ToString culture fix. check-in: cc5c576e43 user: mistachkin tags: branch-1.0.105
2017-05-08
19:15
Prevent test suite helper procedures 'getDbDefaultPageSize' and 'getDbDefaultCacheSize' from raising script errors. check-in: 2c31a69674 user: mistachkin tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to lib/System.Data.SQLite/common.eagle.
2131
2132
2133
2134
2135
2136
2137
2138




2139
2140
2141
2142




2143
2144
2145
2146
2147
2148
2149
      #
      return [expr {
        [sql execute -execute scalar $db $sql [list param1 String $name]] > 0
      }]
    }

    proc getDbDefaultPageSize {} {
      return [executeSql "PRAGMA page_size;" scalar]




    }

    proc getDbDefaultCacheSize {} {
      return [executeSql "PRAGMA cache_size;" scalar]




    }

    proc useLegacyDbPageAndCacheSizes { varName } {
      #
      # NOTE: Refer to the specified variable (e.g. "db") in the context of our
      #       caller.  It contains the database connection handle that will be
      #       used to execute queries used to set the page and cache sizes.







|
>
>
>
>



|
>
>
>
>







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
      #
      return [expr {
        [sql execute -execute scalar $db $sql [list param1 String $name]] > 0
      }]
    }

    proc getDbDefaultPageSize {} {
      if {[catch {executeSql "PRAGMA page_size;" scalar} result] == 0} then {
        return $result
      } else {
        return 0
      }
    }

    proc getDbDefaultCacheSize {} {
      if {[catch {executeSql "PRAGMA cache_size;" scalar} result] == 0} then {
        return $result
      } else {
        return 0
      }
    }

    proc useLegacyDbPageAndCacheSizes { varName } {
      #
      # NOTE: Refer to the specified variable (e.g. "db") in the context of our
      #       caller.  It contains the database connection handle that will be
      #       used to execute queries used to set the page and cache sizes.