diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-15 19:09:41 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-15 19:09:41 (GMT) |
| commit | 52425dcf5d50616645b90e2acee65ef733962afa (patch) | |
| tree | 4514972f7b3097ff2f46bbe8c7686601edb65df1 /generic | |
| parent | 788236542834710698cace10523d24ae7143279d (diff) | |
| download | tcl-52425dcf5d50616645b90e2acee65ef733962afa.zip tcl-52425dcf5d50616645b90e2acee65ef733962afa.tar.gz tcl-52425dcf5d50616645b90e2acee65ef733962afa.tar.bz2 | |
Add one more unused stub entry
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tcl.decls | 2 | ||||
| -rw-r--r-- | generic/tclDecls.h | 9 | ||||
| -rw-r--r-- | generic/tclStubInit.c | 3 |
3 files changed, 9 insertions, 5 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index c3d5073..58b7400 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -2339,7 +2339,7 @@ declare 653 { # ----- BASELINE -- FOR -- 8.7.0 / 9.0.0 ----- # -declare 687 { +declare 688 { void TclUnusedStubEntry(void) } diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 078974c..11e8e59 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -1877,7 +1877,8 @@ EXTERN unsigned char * TclGetByteArrayFromObj_(Tcl_Obj *objPtr, /* Slot 684 is reserved */ /* Slot 685 is reserved */ /* Slot 686 is reserved */ -/* 687 */ +/* Slot 687 is reserved */ +/* 688 */ EXTERN void TclUnusedStubEntry(void); typedef struct { @@ -2601,7 +2602,8 @@ typedef struct TclStubs { void (*reserved684)(void); void (*reserved685)(void); void (*reserved686)(void); - void (*tclUnusedStubEntry) (void); /* 687 */ + void (*reserved687)(void); + void (*tclUnusedStubEntry) (void); /* 688 */ } TclStubs; extern const TclStubs *tclStubsPtr; @@ -3953,8 +3955,9 @@ extern const TclStubs *tclStubsPtr; /* Slot 684 is reserved */ /* Slot 685 is reserved */ /* Slot 686 is reserved */ +/* Slot 687 is reserved */ #define TclUnusedStubEntry \ - (tclStubsPtr->tclUnusedStubEntry) /* 687 */ + (tclStubsPtr->tclUnusedStubEntry) /* 688 */ #endif /* defined(USE_TCL_STUBS) */ diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index c504586..d6621b6 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -1726,7 +1726,8 @@ const TclStubs tclStubs = { 0, /* 684 */ 0, /* 685 */ 0, /* 686 */ - TclUnusedStubEntry, /* 687 */ + 0, /* 687 */ + TclUnusedStubEntry, /* 688 */ }; /* !END!: Do not edit above this line. */ |