diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-26 11:29:37 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-26 11:29:37 (GMT) |
commit | b8117727ea202b0bdb4566ec994df5a4faaf93d8 (patch) | |
tree | dcd62775c6b1aba50d8f758edd6c18f36132d767 /generic/tcl.h | |
parent | 862ae1266cd494baaed59be9a1d74b66de7eaa6a (diff) | |
parent | 033b9b29141f7f3bed61e089654387e8c3059678 (diff) | |
download | tcl-b8117727ea202b0bdb4566ec994df5a4faaf93d8.zip tcl-b8117727ea202b0bdb4566ec994df5a4faaf93d8.tar.gz tcl-b8117727ea202b0bdb4566ec994df5a4faaf93d8.tar.bz2 |
Rebase to 8.7
Diffstat (limited to 'generic/tcl.h')
-rw-r--r-- | generic/tcl.h | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 83dfa27..62a78c0 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -706,9 +706,7 @@ typedef void (Tcl_CmdTraceProc) (void *clientData, Tcl_Interp *interp, typedef int (Tcl_CmdObjTraceProc) (void *clientData, Tcl_Interp *interp, int level, const char *command, Tcl_Command commandInfo, int objc, struct Tcl_Obj *const *objv); -typedef int (Tcl_CmdObjTraceProc2) (void *clientData, Tcl_Interp *interp, - ptrdiff_t level, const char *command, Tcl_Command commandInfo, ptrdiff_t objc, - struct Tcl_Obj *const *objv); +#define Tcl_CmdObjTraceProc2 Tcl_CmdObjTraceProc typedef void (Tcl_CmdObjTraceDeleteProc) (void *clientData); typedef void (Tcl_DupInternalRepProc) (struct Tcl_Obj *srcPtr, struct Tcl_Obj *dupPtr); @@ -733,8 +731,7 @@ typedef int (Tcl_MathProc) (void *clientData, Tcl_Interp *interp, typedef void (Tcl_NamespaceDeleteProc) (void *clientData); typedef int (Tcl_ObjCmdProc) (void *clientData, Tcl_Interp *interp, int objc, struct Tcl_Obj *const *objv); -typedef int (Tcl_ObjCmdProc2) (void *clientData, Tcl_Interp *interp, - ptrdiff_t objc, struct Tcl_Obj *const *objv); +#define Tcl_ObjCmdProc2 Tcl_ObjCmdProc typedef int (Tcl_LibraryInitProc) (Tcl_Interp *interp); typedef int (Tcl_LibraryUnloadProc) (Tcl_Interp *interp, int flags); typedef void (Tcl_PanicProc) (const char *format, ...); |