diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-08-30 14:42:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-08-30 14:42:37 (GMT) |
| commit | 833487508bbaa17224fad03984984dd06a1fc9f0 (patch) | |
| tree | 882091680f510a560207a8ec99d546a34d3ea149 /generic/tcl.h | |
| parent | 209b8d0bde085c41388ae13dbea251ba4dc81749 (diff) | |
| parent | fa96cac29f10b30e6fb499800598cc35ba2a19d3 (diff) | |
| download | tcl-833487508bbaa17224fad03984984dd06a1fc9f0.zip tcl-833487508bbaa17224fad03984984dd06a1fc9f0.tar.gz tcl-833487508bbaa17224fad03984984dd06a1fc9f0.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 cdcd909..d96b8aa 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, ...); |