diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-07 16:14:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-07 16:14:49 (GMT) |
| commit | 4c672977fceafa18192e28a6df28b09bbcfc1677 (patch) | |
| tree | 13693c3966f001dd7eef3beb3491f40e5d0d078f /generic/tkBind.c | |
| parent | 6ac942e39dc79361128d9493515537740d1d2011 (diff) | |
| parent | 390585bc36d575c11753e5b95e1ab4fe8ea04b3b (diff) | |
| download | tk-4c672977fceafa18192e28a6df28b09bbcfc1677.zip tk-4c672977fceafa18192e28a6df28b09bbcfc1677.tar.gz tk-4c672977fceafa18192e28a6df28b09bbcfc1677.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tkBind.c')
| -rw-r--r-- | generic/tkBind.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkBind.c b/generic/tkBind.c index 2b1caff..a3baa51 100644 --- a/generic/tkBind.c +++ b/generic/tkBind.c @@ -734,7 +734,7 @@ static int GetVirtualEvent(Tcl_Interp *interp, VirtualEventTable *vetPtr, Tcl_Obj *virtName); static Tk_Uid GetVirtualEventUid(Tcl_Interp *interp, char *virtString); static int HandleEventGenerate(Tcl_Interp *interp, Tk_Window main, - int objc, Tcl_Obj *const objv[]); + Tcl_Size objc, Tcl_Obj *const objv[]); static void InitVirtualEventTable(VirtualEventTable *vetPtr); static PatSeq * MatchPatterns(TkDisplay *dispPtr, Tk_BindingTable bindPtr, PSList *psList, PSList *psSuccList, unsigned patIndex, const Event *eventPtr, @@ -3896,7 +3896,7 @@ static int HandleEventGenerate( Tcl_Interp *interp, /* Interp for errors return and name lookup. */ Tk_Window mainWin, /* Main window associated with interp. */ - int objc, /* Number of arguments. */ + Tcl_Size objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { union { XEvent general; XVirtualEvent virt; } event; @@ -3916,7 +3916,7 @@ HandleEventGenerate( unsigned count; unsigned flags; int number; - unsigned i; + Tcl_Size i; static const char *const fieldStrings[] = { "-when", "-above", "-borderwidth", "-button", @@ -4026,7 +4026,7 @@ HandleEventGenerate( warp = 0; pos = TCL_QUEUE_TAIL; - for (i = 2; i < (unsigned) objc; i += 2) { + for (i = 2; i < objc; i += 2) { Tcl_Obj *optionPtr, *valuePtr; #if defined(_MSC_VER) /* Work around MSVC compiler optimization bug, see [d93c8175fd]. */ |