diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-30 19:40:32 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-10-30 19:40:32 (GMT) |
| commit | 978ebdabc724269d5559757507f87bd121953099 (patch) | |
| tree | 87be93974759bfc95575170f122d16c56c87640c /unix/tkUnixSend.c | |
| parent | 5f8fa20d23ced1ed51787796956391f963658830 (diff) | |
| download | tk-978ebdabc724269d5559757507f87bd121953099.zip tk-978ebdabc724269d5559757507f87bd121953099.tar.gz tk-978ebdabc724269d5559757507f87bd121953099.tar.bz2 | |
more int -> Tcl_Size (making use of the increased range in Tcl 9.0)
Diffstat (limited to 'unix/tkUnixSend.c')
| -rw-r--r-- | unix/tkUnixSend.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixSend.c b/unix/tkUnixSend.c index de9eadf..2f99625 100644 --- a/unix/tkUnixSend.c +++ b/unix/tkUnixSend.c @@ -1956,7 +1956,7 @@ int TkpTestsendCmd( ClientData clientData, /* Main window for application. */ Tcl_Interp *interp, /* Current interpreter. */ - int objc, /* Number of arguments. */ + Tcl_Size objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument strings. */ { enum { @@ -1969,7 +1969,7 @@ TkpTestsendCmd( Tk_ErrorHandler handler; int index; - if (objc < 2) { + if (objc + 1 < 3) { Tcl_WrongNumArgs(interp, 1, objv, "option ?arg ...?"); return TCL_ERROR; |