diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-28 12:54:18 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-28 12:54:18 (GMT) |
| commit | 0eccd1277574ba27f4bc930b1df2bc4e87f5e371 (patch) | |
| tree | 9d9498e9b1177c0af9646bd1ababb2854370df3d /generic/tclIntDecls.h | |
| parent | 8d556345fd97eb9d60d2e7e1e372e1cc52939ff5 (diff) | |
| parent | ef9154f1436449e65af48e6356b80877668e349e (diff) | |
| download | tcl-0eccd1277574ba27f4bc930b1df2bc4e87f5e371.zip tcl-0eccd1277574ba27f4bc930b1df2bc4e87f5e371.tar.gz tcl-0eccd1277574ba27f4bc930b1df2bc4e87f5e371.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclIntDecls.h')
| -rw-r--r-- | generic/tclIntDecls.h | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index bd33b92..5fa3bb0 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -227,8 +227,7 @@ EXTERN void TclResetShadowedCmdRefs(Tcl_Interp *interp, EXTERN int TclServiceIdle(void); /* Slot 99 is reserved */ /* Slot 100 is reserved */ -/* 101 */ -EXTERN const char * TclSetPreInitScript(const char *string); +/* Slot 101 is reserved */ /* 102 */ EXTERN void TclSetupEnv(Tcl_Interp *interp); /* 103 */ @@ -688,7 +687,7 @@ typedef struct TclIntStubs { int (*tclServiceIdle) (void); /* 98 */ void (*reserved99)(void); void (*reserved100)(void); - const char * (*tclSetPreInitScript) (const char *string); /* 101 */ + void (*reserved101)(void); void (*tclSetupEnv) (Tcl_Interp *interp); /* 102 */ int (*tclSockGetPort) (Tcl_Interp *interp, const char *str, const char *proto, int *portPtr); /* 103 */ void (*reserved104)(void); @@ -1008,8 +1007,7 @@ extern const TclIntStubs *tclIntStubsPtr; (tclIntStubsPtr->tclServiceIdle) /* 98 */ /* Slot 99 is reserved */ /* Slot 100 is reserved */ -#define TclSetPreInitScript \ - (tclIntStubsPtr->tclSetPreInitScript) /* 101 */ +/* Slot 101 is reserved */ #define TclSetupEnv \ (tclIntStubsPtr->tclSetupEnv) /* 102 */ #define TclSockGetPort \ |