diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-10 11:49:11 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-10 11:49:11 (GMT) |
commit | 9d1989bb3d587463c572ff5d4dd49ec042c68d19 (patch) | |
tree | c2d7b09acbf000b69962c4cd275cfaaa7246a64e /generic/tclDecls.h | |
parent | 0cc51f1259bd11611fce289213ceb3ae398d2406 (diff) | |
download | tcl-9d1989bb3d587463c572ff5d4dd49ec042c68d19.zip tcl-9d1989bb3d587463c572ff5d4dd49ec042c68d19.tar.gz tcl-9d1989bb3d587463c572ff5d4dd49ec042c68d19.tar.bz2 |
Handle Tcl_SetResult() the same way as Tcl_EventuallyFree
Diffstat (limited to 'generic/tclDecls.h')
-rw-r--r-- | generic/tclDecls.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 79a2f7b..f8e9bcf 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -3976,6 +3976,9 @@ extern const TclStubs *tclStubsPtr; # undef Tcl_EventuallyFree # define Tcl_EventuallyFree \ ((void (*)(void *,void *))(void *)(tclStubsPtr->tcl_EventuallyFree)) /* 132 */ +# undef Tcl_SetResult +# define Tcl_SetResult \ + ((void (*)(Tcl_Interp *, char *, void *))(void *)(tclStubsPtr->tcl_SetResult)) /* 232 */ #endif #if defined(_WIN32) && defined(UNICODE) |