2 more spare stub entries

tcltk · Feb 23, 2022 · c21feb2 · c21feb2
1 parent a2fefd7
commit c21feb2
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 5 deletions.
diff --git a/generic/tcl.decls b/generic/tcl.decls
@@ -2111,7 +2111,7 @@ declare 579 {
 
 # ----- BASELINE -- FOR -- 8.5.0 ----- #
 
-declare 668 {
+declare 670 {
     void TclUnusedStubEntry(void)
 }
 

diff --git a/generic/tclDecls.h b/generic/tclDecls.h
@@ -3500,9 +3500,11 @@ EXTERN void		Tcl_AppendPrintfToObj(Tcl_Obj *objPtr,
 /* Slot 665 is reserved */
 /* Slot 666 is reserved */
 /* Slot 667 is reserved */
+/* Slot 668 is reserved */
+/* Slot 669 is reserved */
 #ifndef TclUnusedStubEntry_TCL_DECLARED
 #define TclUnusedStubEntry_TCL_DECLARED
-/* 668 */
+/* 670 */
 EXTERN void		TclUnusedStubEntry(void);
 #endif
 
@@ -4208,7 +4210,9 @@ typedef struct TclStubs {
     VOID *reserved665;
     VOID *reserved666;
     VOID *reserved667;
-    void (*tclUnusedStubEntry) (void); /* 668 */
+    VOID *reserved668;
+    VOID *reserved669;
+    void (*tclUnusedStubEntry) (void); /* 670 */
 } TclStubs;
 
 extern TclStubs *tclStubsPtr;
@@ -6649,9 +6653,11 @@ extern TclStubs *tclStubsPtr;
 /* Slot 665 is reserved */
 /* Slot 666 is reserved */
 /* Slot 667 is reserved */
+/* Slot 668 is reserved */
+/* Slot 669 is reserved */
 #ifndef TclUnusedStubEntry
 #define TclUnusedStubEntry \
-	(tclStubsPtr->tclUnusedStubEntry) /* 668 */
+	(tclStubsPtr->tclUnusedStubEntry) /* 670 */
 #endif
 
 #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */

diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
@@ -1466,7 +1466,9 @@ TclStubs tclStubs = {
     NULL, /* 665 */
     NULL, /* 666 */
     NULL, /* 667 */
-    TclUnusedStubEntry, /* 668 */
+    NULL, /* 668 */
+    NULL, /* 669 */
+    TclUnusedStubEntry, /* 670 */
 };
 
 /* !END!: Do not edit above this line. */