diff options
Diffstat (limited to 'generic/tclCmdIL.c')
| -rw-r--r-- | generic/tclCmdIL.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 663d962..e90b793 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -3754,7 +3754,7 @@ Tcl_LsearchObjCmd( i = (lower + upper)/2; i -= i % groupSize; - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); itemPtr = NULL; if (sortInfo.indexc != 0) { @@ -3855,7 +3855,7 @@ Tcl_LsearchObjCmd( } for (i = start; i < listc; i += groupSize) { match = 0; - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); itemPtr = NULL; if (sortInfo.indexc != 0) { @@ -3957,7 +3957,7 @@ Tcl_LsearchObjCmd( */ if (returnSubindices && (sortInfo.indexc != 0)) { - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); itemPtr = SelectObjFromSublist(listv[i+groupOffset], &sortInfo); Tcl_ListObjAppendElement(interp, listPtr, itemPtr); @@ -3965,7 +3965,7 @@ Tcl_LsearchObjCmd( Tcl_ListObjReplace(interp, listPtr, LIST_MAX, 0, groupSize, &listv[i]); } else { - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); itemPtr = listv[i]; Tcl_ListObjAppendElement(interp, listPtr, itemPtr); } @@ -3986,7 +3986,7 @@ Tcl_LsearchObjCmd( } } - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); itemPtr = NULL; /* @@ -4037,7 +4037,7 @@ Tcl_LsearchObjCmd( done: /* potential lingering abstract list element */ - Tcl_BumpObj(itemPtr); + Tcl_BounceRefCount(itemPtr); if (startPtr != NULL) { Tcl_DecrRefCount(startPtr); @@ -5582,7 +5582,7 @@ SelectObjFromSublist( return NULL; } objPtr = currentObj; - Tcl_BumpObj(lastObj); + Tcl_BounceRefCount(lastObj); lastObj = currentObj; } return objPtr; |