diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-12 08:58:03 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-12 08:58:03 (GMT) |
commit | 9c0541d0e4b22e9f9e12d754ba7c9bb1c430a0a8 (patch) | |
tree | 818f8cedb9721cc821eef0a3436ce1d6625885a6 /unix/dltest | |
parent | 3643909840952b5e4dc9edd9d1fec509c43d2c08 (diff) | |
parent | bee240eab0a1a75644337eccaa0c17001330f72a (diff) | |
download | tcl-9c0541d0e4b22e9f9e12d754ba7c9bb1c430a0a8.zip tcl-9c0541d0e4b22e9f9e12d754ba7c9bb1c430a0a8.tar.gz tcl-9c0541d0e4b22e9f9e12d754ba7c9bb1c430a0a8.tar.bz2 |
Fix [0b9200888e]: TIP #660 breaks TIP #628/#630
Diffstat (limited to 'unix/dltest')
-rw-r--r-- | unix/dltest/pkgt.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/dltest/pkgt.c b/unix/dltest/pkgt.c index 1f326f5..77e21ac 100644 --- a/unix/dltest/pkgt.c +++ b/unix/dltest/pkgt.c @@ -16,10 +16,10 @@ static int TraceProc2 ( void *clientData, Tcl_Interp *interp, - Tcl_Size level, + ptrdiff_t level, const char *command, Tcl_Command commandInfo, - Tcl_Size objc, + ptrdiff_t objc, struct Tcl_Obj *const *objv) { (void)clientData; @@ -55,12 +55,12 @@ static int Pkgt_EqObjCmd2( void *dummy, /* Not used. */ Tcl_Interp *interp, /* Current interpreter. */ - Tcl_Size objc, /* Number of arguments. */ + ptrdiff_t objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { Tcl_WideInt result; const char *str1, *str2; - Tcl_Size len1, len2; + ptrdiff_t len1, len2; (void)dummy; if (objc != 3) { |