summaryrefslogtreecommitdiffstats
path: root/win
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 /win
parent4462cc72bb42f0c350c2059a67c357a63220e326 (diff)
parenteae252da83b4af0e55e40abefe4e3d7ff8f1a370 (diff)
downloadtcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.zip
tcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.tar.gz
tcl-51db664c7d3fa5bc0a1c216ac3ee89c1eeba6f09.tar.bz2
Convert Tcl_GetIndexFromObj implementation to macro
Diffstat (limited to 'win')
-rw-r--r--win/tclWinTest.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinTest.c b/win/tclWinTest.c
index 136c4db..773ed19 100644
--- a/win/tclWinTest.c
+++ b/win/tclWinTest.c
@@ -368,8 +368,8 @@ TestExceptionCmd(
Tcl_WrongNumArgs(interp, 0, objv, "<type-of-exception>");
return TCL_ERROR;
}
- if (Tcl_GetIndexFromObj(interp, objv[1], cmds, "command", 0,
- &cmd) != TCL_OK) {
+ if (Tcl_GetIndexFromObjStruct(interp, objv[1], cmds,
+ sizeof(char *), "command", 0, &cmd) != TCL_OK) {
return TCL_ERROR;
}