diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 21:07:50 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 21:07:50 (GMT) |
commit | eb046e78c4ad8280ccf115de1889f60249b8dc8b (patch) | |
tree | ad2b7f6658f55e83f7eb84c5b49033af9f4d7821 /generic/tcl.h | |
parent | 33e5497461ca8dfddc6aebcf7fcca7b561ac66b5 (diff) | |
parent | 539d2ff95a9c0307017feb87f2e33c0f9b18bd12 (diff) | |
download | tcl-eb046e78c4ad8280ccf115de1889f60249b8dc8b.zip tcl-eb046e78c4ad8280ccf115de1889f60249b8dc8b.tar.gz tcl-eb046e78c4ad8280ccf115de1889f60249b8dc8b.tar.bz2 |
Fix [7cb7409e05]: Tcl_ParseArgsObjv bug with TCL_ARGV_GENFUNC. With testcase
Diffstat (limited to 'generic/tcl.h')
-rw-r--r-- | generic/tcl.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 059b7a4..16bfd2f 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2190,8 +2190,8 @@ typedef struct { typedef int (Tcl_ArgvFuncProc)(void *clientData, Tcl_Obj *objPtr, void *dstPtr); -typedef int (Tcl_ArgvGenFuncProc)(void *clientData, Tcl_Interp *interp, - int objc, Tcl_Obj *const *objv, void *dstPtr); +typedef Tcl_Size (Tcl_ArgvGenFuncProc)(void *clientData, Tcl_Interp *interp, + Tcl_Size objc, Tcl_Obj *const *objv, void *dstPtr); /* * Shorthand for commonly used argTable entries. |