summaryrefslogtreecommitdiffstats
path: root/generic/tclCmdIL.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-24 10:37:30 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-01-24 10:37:30 (GMT)
commit51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09 (patch)
tree6cd1984366d92404681d2d61d43d3558ae6c0d17 /generic/tclCmdIL.c
parent4462cc72bb42f0c350c2059a67c357a63220e326 (diff)
parenteae252da83b4af0e55e40abefe4e3d7ff8f1a370 (diff)
downloadtcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.zip
tcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.tar.gz
tcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.tar.bz2
Convert Tcl_GetIndexFromObj implementation to macro
Diffstat (limited to 'generic/tclCmdIL.c')
-rw-r--r--generic/tclCmdIL.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c
index 5afe265..7fdab05 100644
--- a/generic/tclCmdIL.c
+++ b/generic/tclCmdIL.c
@@ -2962,8 +2962,8 @@ Tcl_LsearchObjCmd(
}
for (i = 1; i < objc-2; i++) {
- if (Tcl_GetIndexFromObj(interp, objv[i], options, "option", 0, &index)
- != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[i], options,
+ sizeof(char *), "option", 0, &index) != TCL_OK) {
if (startPtr != NULL) {
Tcl_DecrRefCount(startPtr);
}
@@ -3691,8 +3691,8 @@ Tcl_LsortObjCmd(
groupOffset = 0;
indexPtr = NULL;
for (i = 1; i < objc-1; i++) {
- if (Tcl_GetIndexFromObj(interp, objv[i], switches, "option", 0,
- &index) != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[i], switches,
+ sizeof(char *), "option", 0, &index) != TCL_OK) {
sortInfo.resultCode = TCL_ERROR;
goto done2;
}