Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Fix escaping of test override values containing Tcl reserved characters in the 'getTestOverridesPreamble' test suite helper procedure. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
83f0c2e44e5017e6f40a1b6376f69f9f |
| User & Date: | mistachkin 2016-10-28 23:55:11 |
Context
|
2016-10-28
| ||
| 23:58 | Permit and replace the tokens '%SQLite_AssemblyDirectory%' and '%SQLite_XmlConfigDirectory%' to appear in the XML configuration file. Also, permit and replace the token '%SQLite_AssemblyDirectory%' to appear in environment variable values that are used by the settings subsystem. Pursuant to ticket [d4728aecb7]. check-in: 11cd3bd238 user: mistachkin tags: trunk | |
| 23:55 | Fix escaping of test override values containing Tcl reserved characters in the 'getTestOverridesPreamble' test suite helper procedure. check-in: 83f0c2e44e user: mistachkin tags: trunk | |
|
2016-10-27
| ||
| 20:19 | Bump version to 1.0.104.0. Update version history docs. Prevent the GetByte, GetChar, and GetInt16 methods of the SQLiteDataReader class from throwing exceptions for large integer values. Pursuant to [5535448538]. check-in: 2b70123e05 user: mistachkin tags: trunk | |
Changes
Changes to lib/System.Data.SQLite/common.eagle.
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
....
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
|
#
# NOTE: By default, there is no SQL to execute during the connection
# setup procedure (i.e. for every test database connection).
#
return ""
}
}
proc getTestOverridesPreamble { {extraVarNames ""} } {
set varNames [list]
#
# NOTE: If available, start with the master list of test override
# variables.
................................................................................
# NOTE: Does the variable exist in this interpreter context?
#
if {[info exists $fullVarName]} then {
#
# NOTE: Append a script fragment to the result that will correctly
# copy any contained value to another interpreter context.
#
append result \n "set " $fullVarName " \{" [set $fullVarName] \}
}
}
#
# NOTE: If the result contains one or more script fragments, append a
# newline.
#
|
>
>
>
>
|
>
|
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
....
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
|
#
# NOTE: By default, there is no SQL to execute during the connection
# setup procedure (i.e. for every test database connection).
#
return ""
}
}
proc getStringMapForTclEscape {} {
return [list \\ \\\\ \[ \\\[ \] \\\] \$ \\\$]
}
proc getTestOverridesPreamble { {extraVarNames ""} } {
set varNames [list]
#
# NOTE: If available, start with the master list of test override
# variables.
................................................................................
# NOTE: Does the variable exist in this interpreter context?
#
if {[info exists $fullVarName]} then {
#
# NOTE: Append a script fragment to the result that will correctly
# copy any contained value to another interpreter context.
#
append result \n "set " $fullVarName " \{" [string map \
[getStringMapForTclEscape] [set $fullVarName]] \}
}
}
#
# NOTE: If the result contains one or more script fragments, append a
# newline.
#
|