Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | merge core-8-5-branch ([824752f10e] Avoid calling Tcl_SetObjResult if interp is NULL) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
16efbc4dbf572ac1478f55ba08b3f2e3 |
| User & Date: | gahr 2016-11-04 14:24:42 |
Context
|
2016-11-04
| ||
| 14:42 | close fork check-in: e5a5037389 user: dgp tags: trunk | |
| 14:24 | merge core-8-5-branch ([824752f10e] Avoid calling Tcl_SetObjResult if interp is NULL) check-in: 16efbc4dbf user: gahr tags: trunk | |
| 14:21 | [824752f10e] Avoid calling Tcl_SetObjResult if interp is NULL check-in: b6601d604f user: gahr tags: core-8-5-branch | |
|
2016-11-02
| ||
| 12:45 | merge core-8-6-branch (http package version update) check-in: 0c403244ae user: jan.nijtmans tags: trunk | |
Changes
Changes to generic/tclListObj.c.
| ︙ | ︙ | |||
903 904 905 906 907 908 909 |
* overflow in determining 'first+count'.
*/
count = numElems - first;
}
if (objc > LIST_MAX - (numElems - count)) {
| > | | > > | 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 |
* overflow in determining 'first+count'.
*/
count = numElems - first;
}
if (objc > LIST_MAX - (numElems - count)) {
if (interp != NULL) {
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
"max length of a Tcl list (%d elements) exceeded",
LIST_MAX));
}
return TCL_ERROR;
}
isShared = (listRepPtr->refCount > 1);
numRequired = numElems - count + objc; /* Known <= LIST_MAX */
needGrow = numRequired > listRepPtr->maxElemCount;
for (i = 0; i < objc; i++) {
|
| ︙ | ︙ |