Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Merge trunk |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | novem |
| Files: | files | file ages | folders |
| SHA3-256: |
d07114f217abeb3411f69932644a43d5 |
| User & Date: | jan.nijtmans 2019-07-03 10:53:33 |
Context
|
2019-07-03
| ||
| 11:15 | Merge trunk check-in: c26f94b084 user: jan.nijtmans tags: novem | |
| 10:53 | Merge trunk check-in: d07114f217 user: jan.nijtmans tags: novem | |
| 10:43 | Merge 2.8 branch. Use TCL_INDEX_NONE as appropriate check-in: 7120359506 user: jan.nijtmans tags: trunk | |
|
2019-07-02
| ||
| 15:40 | Merge trunk check-in: 5dbfaa6b67 user: jan.nijtmans tags: novem | |
Changes
Changes to generic/threadSvListCmd.c.
383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 ... 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 .... 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 |
if (first == TCL_INDEX_NONE) {
first = 0;
}
if (llen && first >= (size_t)llen && strncmp(firstArg, "end", argLen)) {
Tcl_AppendResult(interp, "list doesn't have element ", firstArg, NULL);
goto cmd_err;
}
if (last >= (size_t)llen) {
last = llen - 1;
}
if (first + 1 <= last + 1) {
ndel = last - first + 1;
} else {
ndel = 0;
}
................................................................................
ret = Tcl_GetIntForIndex(interp, objv[off+1], llen-1, &last);
if (ret != TCL_OK) {
goto cmd_err;
}
if (first == TCL_INDEX_NONE) {
first = 0;
}
if (last >= (size_t)llen) {
last = llen - 1;
}
if (first + 1 > last + 1) {
goto cmd_ok;
}
nargs = last - first + 1;
................................................................................
break;
}
/*
* Break the loop after extracting the innermost sublist
*/
if (i >= (indexCount - 1)) {
result = TCL_OK;
break;
}
/*
* Extract the appropriate sublist and chain it onto the linked
* list of Tcl_Obj's whose string reps must be spoilt.
|
| | | |
383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 ... 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 .... 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 |
if (first == TCL_INDEX_NONE) {
first = 0;
}
if (llen && first >= (size_t)llen && strncmp(firstArg, "end", argLen)) {
Tcl_AppendResult(interp, "list doesn't have element ", firstArg, NULL);
goto cmd_err;
}
if (last + 1 >= (size_t)llen + 1) {
last = llen - 1;
}
if (first + 1 <= last + 1) {
ndel = last - first + 1;
} else {
ndel = 0;
}
................................................................................
ret = Tcl_GetIntForIndex(interp, objv[off+1], llen-1, &last);
if (ret != TCL_OK) {
goto cmd_err;
}
if (first == TCL_INDEX_NONE) {
first = 0;
}
if (last + 1 >= (size_t)llen + 1) {
last = llen - 1;
}
if (first + 1 > last + 1) {
goto cmd_ok;
}
nargs = last - first + 1;
................................................................................
break;
}
/*
* Break the loop after extracting the innermost sublist
*/
if (i + 1 >= indexCount) {
result = TCL_OK;
break;
}
/*
* Extract the appropriate sublist and chain it onto the linked
* list of Tcl_Obj's whose string reps must be spoilt.
|