diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 21:20:21 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 21:20:21 (GMT) |
commit | 1a1118fa21d731504dac09ed2e6d6238601f5c84 (patch) | |
tree | 582b351a98fe27e820ca3d6d0281519c1a11dbcf /generic/tkObj.c | |
parent | d72c843661bf5789ff40389b8b71707d92437397 (diff) | |
download | tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.zip tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.tar.gz tk-1a1118fa21d731504dac09ed2e6d6238601f5c84.tar.bz2 |
More -1 -> TCL_INDEX_NONE. More TCL_UNUSED(
Diffstat (limited to 'generic/tkObj.c')
-rw-r--r-- | generic/tkObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkObj.c b/generic/tkObj.c index 47e593f..2df8838 100644 --- a/generic/tkObj.c +++ b/generic/tkObj.c @@ -1077,7 +1077,7 @@ Tcl_Obj * Tk_NewWindowObj( Tk_Window tkwin) { - Tcl_Obj *objPtr = Tcl_NewStringObj(Tk_PathName(tkwin), -1); + Tcl_Obj *objPtr = Tcl_NewStringObj(Tk_PathName(tkwin), TCL_INDEX_NONE); TkMainInfo *mainPtr = ((TkWindow *) tkwin)->mainPtr; WindowRep *winPtr; @@ -1152,7 +1152,7 @@ TkParsePadAmount( } if (objc != 1 && objc != 2) { Tcl_SetObjResult(interp, Tcl_NewStringObj( - "wrong number of parts to pad specification", -1)); + "wrong number of parts to pad specification", TCL_INDEX_NONE)); Tcl_SetErrorCode(interp, "TK", "VALUE", "PADDING", "PARTS", NULL); return TCL_ERROR; } |