diff options
| -rw-r--r-- | generic/tkFont.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/tkFont.c b/generic/tkFont.c index 11f889a..ffabeab 100644 --- a/generic/tkFont.c +++ b/generic/tkFont.c @@ -324,7 +324,7 @@ static const char *const globalFontClass[] = { static int ConfigAttributesObj(Tcl_Interp *interp, - Tk_Window tkwin, int objc, Tcl_Obj *const objv[], + Tk_Window tkwin, Tcl_Size objc, Tcl_Obj *const objv[], TkFontAttributes *faPtr); static void DupFontObjProc(Tcl_Obj *srcObjPtr, Tcl_Obj *dupObjPtr); static int FieldSpecified(const char *field); @@ -3415,13 +3415,14 @@ static int ConfigAttributesObj( Tcl_Interp *interp, /* Interp for error return. */ TCL_UNUSED(Tk_Window), /* For display on which font will be used. */ - int objc, /* Number of elements in argv. */ + Tcl_Size objc, /* Number of elements in argv. */ Tcl_Obj *const objv[], /* Command line options. */ TkFontAttributes *faPtr) /* Font attributes structure whose fields are * to be modified. Structure must already be * properly initialized. */ { - int i, n, index; + Tcl_Size i; + int n, index; Tcl_Obj *optionPtr, *valuePtr; const char *value; |