diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-22 16:45:14 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-22 16:45:14 (GMT) |
commit | 842ee17d6f2ba6644263a7e2f3335a9e5d613edc (patch) | |
tree | 0bc1f9a85609d214d24d92be4a3f1eaff43700ee /generic | |
parent | c21feb251ebe185b37d7061f8cb7c051cbdb15e8 (diff) | |
download | tcl-842ee17d6f2ba6644263a7e2f3335a9e5d613edc.zip tcl-842ee17d6f2ba6644263a7e2f3335a9e5d613edc.tar.gz tcl-842ee17d6f2ba6644263a7e2f3335a9e5d613edc.tar.bz2 |
Reserve 3 more stub entries
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tcl.decls | 2 | ||||
-rw-r--r-- | generic/tclDecls.h | 15 | ||||
-rw-r--r-- | generic/tclStubInit.c | 5 |
3 files changed, 17 insertions, 5 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 01318dd..8536168 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -2111,7 +2111,7 @@ declare 579 { # ----- BASELINE -- FOR -- 8.5.0 ----- # -declare 670 { +declare 673 { void TclUnusedStubEntry(void) } diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 10e9fc8..b8b17d2 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -3502,9 +3502,12 @@ EXTERN void Tcl_AppendPrintfToObj(Tcl_Obj *objPtr, /* Slot 667 is reserved */ /* Slot 668 is reserved */ /* Slot 669 is reserved */ +/* Slot 670 is reserved */ +/* Slot 671 is reserved */ +/* Slot 672 is reserved */ #ifndef TclUnusedStubEntry_TCL_DECLARED #define TclUnusedStubEntry_TCL_DECLARED -/* 670 */ +/* 673 */ EXTERN void TclUnusedStubEntry(void); #endif @@ -4212,7 +4215,10 @@ typedef struct TclStubs { VOID *reserved667; VOID *reserved668; VOID *reserved669; - void (*tclUnusedStubEntry) (void); /* 670 */ + VOID *reserved670; + VOID *reserved671; + VOID *reserved672; + void (*tclUnusedStubEntry) (void); /* 673 */ } TclStubs; extern TclStubs *tclStubsPtr; @@ -6655,9 +6661,12 @@ extern TclStubs *tclStubsPtr; /* Slot 667 is reserved */ /* Slot 668 is reserved */ /* Slot 669 is reserved */ +/* Slot 670 is reserved */ +/* Slot 671 is reserved */ +/* Slot 672 is reserved */ #ifndef TclUnusedStubEntry #define TclUnusedStubEntry \ - (tclStubsPtr->tclUnusedStubEntry) /* 670 */ + (tclStubsPtr->tclUnusedStubEntry) /* 673 */ #endif #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 3859995..e7dc0c1 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -1468,7 +1468,10 @@ TclStubs tclStubs = { NULL, /* 667 */ NULL, /* 668 */ NULL, /* 669 */ - TclUnusedStubEntry, /* 670 */ + NULL, /* 670 */ + NULL, /* 671 */ + NULL, /* 672 */ + TclUnusedStubEntry, /* 673 */ }; /* !END!: Do not edit above this line. */ |