diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-22 10:04:53 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-22 10:04:53 (GMT) |
| commit | 4402cae44685a3ca1b3c0c4bf9c5d0680195a0e8 (patch) | |
| tree | a6b92c6ac187045c878a3975fc70da53f9feceb6 /generic/tclInt.h | |
| parent | b58023ffa18027e959e9f2e56118606adfe8343a (diff) | |
| download | tcl-4402cae44685a3ca1b3c0c4bf9c5d0680195a0e8.zip tcl-4402cae44685a3ca1b3c0c4bf9c5d0680195a0e8.tar.gz tcl-4402cae44685a3ca1b3c0c4bf9c5d0680195a0e8.tar.bz2 | |
Use TclListObjRange in lassign for performance reasons
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index c073f42..1481b5c 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3249,8 +3249,8 @@ MODULE_SCOPE Tcl_Obj * TclListObjCopy(Tcl_Interp *interp, Tcl_Obj *listPtr); MODULE_SCOPE int TclListObjAppendElements(Tcl_Interp *interp, Tcl_Obj *toObj, int elemCount, Tcl_Obj *const elemObjv[]); -MODULE_SCOPE Tcl_Obj * TclListObjRange(Tcl_Obj *listPtr, int fromIdx, - int toIdx); +MODULE_SCOPE Tcl_Obj * TclListObjRange(Tcl_Interp *interp, Tcl_Obj *listPtr, + int fromIdx, int toIdx); MODULE_SCOPE Tcl_Obj * TclLsetList(Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *indexPtr, Tcl_Obj *valuePtr); MODULE_SCOPE Tcl_Obj * TclLsetFlat(Tcl_Interp *interp, Tcl_Obj *listPtr, |