diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-01 15:49:33 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-01 15:49:33 (GMT) |
commit | 6c9d67ac2ce6b610bb42688c03d6abf8e99f2a6b (patch) | |
tree | e0af1794b6829d3f838125af8b8c1f94632a35fc /generic/tkUtil.c | |
parent | 88df780305133662dbb17971c05b9663a2b69f9d (diff) | |
download | tk-6c9d67ac2ce6b610bb42688c03d6abf8e99f2a6b.zip tk-6c9d67ac2ce6b610bb42688c03d6abf8e99f2a6b.tar.gz tk-6c9d67ac2ce6b610bb42688c03d6abf8e99f2a6b.tar.bz2 |
some more int -> size_t changes
Diffstat (limited to 'generic/tkUtil.c')
-rw-r--r-- | generic/tkUtil.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/tkUtil.c b/generic/tkUtil.c index 0290c94..7ff9ecb 100644 --- a/generic/tkUtil.c +++ b/generic/tkUtil.c @@ -729,8 +729,8 @@ Tk_GetScrollInfoObj( int *intPtr) /* Filled in with number of pages or lines to * scroll, if any. */ { - int length; - const char *arg = Tcl_GetStringFromObj(objv[2], &length); + const char *arg = Tcl_GetString(objv[2]); + size_t length = objv[2]->length; #define ArgPfxEq(str) \ ((arg[0] == str[0]) && !strncmp(arg, str, (unsigned)length)) @@ -753,7 +753,8 @@ Tk_GetScrollInfoObj( return TK_SCROLL_ERROR; } - arg = Tcl_GetStringFromObj(objv[4], &length); + arg = Tcl_GetString(objv[4]); + length = objv[4]->length; if (ArgPfxEq("pages")) { return TK_SCROLL_PAGES; } else if (ArgPfxEq("units")) { |