diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2025-04-28 09:51:38 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2025-04-28 09:51:38 (GMT) |
| commit | a905678adc56897b8ccdf22d6da740f08b18ad77 (patch) | |
| tree | 0f554e7cb4bcb00effec91ab62de6bf0da1b1f63 | |
| parent | 96b3e6bc0983c4b7980e0ba67b8aee0b3396d44f (diff) | |
| download | tcl-a905678adc56897b8ccdf22d6da740f08b18ad77.zip tcl-a905678adc56897b8ccdf22d6da740f08b18ad77.tar.gz tcl-a905678adc56897b8ccdf22d6da740f08b18ad77.tar.bz2 | |
Minor tweak. Pass interp as NULL as error thrown away.
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index ecd7a8b..c6adfd6 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -4715,7 +4715,7 @@ TEBCresume( if (TclObjTypeHasProc(valuePtr, indexProc)) { DECACHE_STACK_INFO(); length = TclObjTypeLength(valuePtr); - if (TclGetIntForIndexM(interp, value2Ptr, length-1, &index)!=TCL_OK) { + if (TclGetIntForIndexM(NULL, value2Ptr, length-1, &index)!=TCL_OK) { CACHE_STACK_INFO(); /* Could be list of indices. Let TclLindexList handle it below */ } else { |