diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-26 14:55:19 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-26 14:55:19 (GMT) |
commit | 86cd2be422a18e54b551fb4ecd1a7f0f8ee83321 (patch) | |
tree | 9f8e49187e3c505bce95029d488de82ee4b3962a /generic/ttk/ttkManager.c | |
parent | 30c18ff6f591bd8f212bdcc3e4adf476ff9176bf (diff) | |
download | tk-86cd2be422a18e54b551fb4ecd1a7f0f8ee83321.zip tk-86cd2be422a18e54b551fb4ecd1a7f0f8ee83321.tar.gz tk-86cd2be422a18e54b551fb4ecd1a7f0f8ee83321.tar.bz2 |
Convert Tk_ItemIndexProc/Tk_ItemInsertProc to use size_t as index type, when compiled against Tcl 9 headers. Various more fixes in using size_t for Tcl >= 9
Diffstat (limited to 'generic/ttk/ttkManager.c')
-rw-r--r-- | generic/ttk/ttkManager.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/ttk/ttkManager.c b/generic/ttk/ttkManager.c index 2eb3c0a..2795570 100644 --- a/generic/ttk/ttkManager.c +++ b/generic/ttk/ttkManager.c @@ -444,7 +444,7 @@ TkSizeT Ttk_SlaveIndex(Ttk_Manager *mgr, Tk_Window slaveWindow) */ int Ttk_GetSlaveIndexFromObj( - Tcl_Interp *interp, Ttk_Manager *mgr, Tcl_Obj *objPtr, int *indexPtr) + Tcl_Interp *interp, Ttk_Manager *mgr, Tcl_Obj *objPtr, TkSizeT *indexPtr) { const char *string = Tcl_GetString(objPtr); TkSizeT slaveIndex = 0; @@ -457,7 +457,7 @@ int Ttk_GetSlaveIndexFromObj( slaveIndex = idx; if ((size_t)slaveIndex > (size_t)mgr->nSlaves) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( - "Slave index %d out of bounds", slaveIndex)); + "Slave index %d out of bounds", (int)slaveIndex)); Tcl_SetErrorCode(interp, "TTK", "SLAVE", "INDEX", NULL); return TCL_ERROR; } |