Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | merge to rc |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-6-b2-rc |
| Files: | files | file ages | folders |
| SHA1: |
b2cc6298a49077b83ce894e2e6fc3d69 |
| User & Date: | dgp 2011-07-19 19:42:27 |
Context
|
2011-07-27
| ||
| 17:26 | merge to rc check-in: b8ec099c51 user: dgp tags: core-8-6-b2-rc | |
|
2011-07-19
| ||
| 19:42 | merge to rc check-in: b2cc6298a4 user: dgp tags: core-8-6-b2-rc | |
| 19:31 | 3371644 Repair failure to properly handle (length == -1) in TclConvertElement(). check-in: 8e35530849 user: dgp tags: trunk | |
| 15:29 | merge to rc check-in: 6e381c8a11 user: dgp tags: core-8-6-b2-rc | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 | 2011-07-19 Donal K. Fellows <[email protected]> * doc/*.3, doc/*.n: Many small fixes to documentation as part of project to improve quality of generated HTML docs. * tools/tcltk-man2html.tcl (remap_link_target): More complete set of definitions of link targets, especially for major C API types. | > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 | 2011-07-19 Don Porter <[email protected]> * generic/tclUtil.c: [Bug 3371644] Repair failure to properly handle * tests/util.test: (length == -1) scanning in TclConvertElement(). Thanks to Thomas Sader and Alexandre Ferrieux. 2011-07-19 Donal K. Fellows <[email protected]> * doc/*.3, doc/*.n: Many small fixes to documentation as part of project to improve quality of generated HTML docs. * tools/tcltk-man2html.tcl (remap_link_target): More complete set of definitions of link targets, especially for major C API types. |
| ︙ | ︙ |
Changes to generic/tclUtil.c.
| ︙ | ︙ | |||
1257 1258 1259 1260 1261 1262 1263 |
/* Escape leading hash as needed and requested. */
if ((*src == '#') && !(flags & TCL_DONT_QUOTE_HASH)) {
if (conversion == CONVERT_ESCAPE) {
p[0] = '\\';
p[1] = '#';
p += 2;
src++;
| | | 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 |
/* Escape leading hash as needed and requested. */
if ((*src == '#') && !(flags & TCL_DONT_QUOTE_HASH)) {
if (conversion == CONVERT_ESCAPE) {
p[0] = '\\';
p[1] = '#';
p += 2;
src++;
length -= (length > 0);
} else {
conversion = CONVERT_BRACE;
}
}
/* No escape or quoting needed. Copy the literal string value. */
if (conversion == CONVERT_NONE) {
|
| ︙ | ︙ |
Changes to tests/util.test.
| ︙ | ︙ | |||
171 172 173 174 175 176 177 178 179 180 181 182 183 184 |
proc #\{ {} {return #}
set cmd [list #\{]
append cmd "" ;# force string rep generation
set result [eval $cmd]
rename #\{ {}
set result
} {#}
test util-4.1 {Tcl_ConcatObj - backslash-space at end of argument} {
concat a {b\ } c
} {a b\ c}
test util-4.2 {Tcl_ConcatObj - backslash-space at end of argument} {
concat a {b\ } c
} {a b\ c}
| > > > > > > | 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 |
proc #\{ {} {return #}
set cmd [list #\{]
append cmd "" ;# force string rep generation
set result [eval $cmd]
rename #\{ {}
set result
} {#}
test util-3.6 {Tcl_ConvertElement, Bug 3371644} {
interp create #\\
interp alias {} x #\\ concat
interp target {} x ;# Crash if bug not fixed
interp delete #\\
} {}
test util-4.1 {Tcl_ConcatObj - backslash-space at end of argument} {
concat a {b\ } c
} {a b\ c}
test util-4.2 {Tcl_ConcatObj - backslash-space at end of argument} {
concat a {b\ } c
} {a b\ c}
|
| ︙ | ︙ |