diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-31 11:37:42 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-31 11:37:42 (GMT) |
| commit | facec4acde56111a20908c172580556aa5fe1b96 (patch) | |
| tree | 41f6e54b98501e7c848f8363e14ad38def6d05d8 /generic/tcl.h | |
| parent | 4d36f69dcdb6022174323ab248c3d17b0073e8a9 (diff) | |
| parent | 7bb6d9ce572c47747256f1e1edcb4a29cd7ac279 (diff) | |
| download | tcl-facec4acde56111a20908c172580556aa5fe1b96.zip tcl-facec4acde56111a20908c172580556aa5fe1b96.tar.gz tcl-facec4acde56111a20908c172580556aa5fe1b96.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index c6f5e30..701f919 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -576,6 +576,11 @@ typedef void (Tcl_ServiceModeHookProc) (int mode); typedef void *(Tcl_InitNotifierProc) (void); typedef void (Tcl_FinalizeNotifierProc) (void *clientData); typedef void (Tcl_MainLoopProc) (void); + +/* Undocumented. To be formalized by TIP #595 */ +#define Tcl_LibraryInitProc Tcl_PackageInitProc +#define Tcl_LibraryUnloadProc Tcl_PackageUnloadProc +#define Tcl_StaticLibrary Tcl_StaticPackage /* *---------------------------------------------------------------------------- @@ -2190,7 +2195,7 @@ EXTERN const char * Tcl_InitSubsystems(void); EXTERN const char * Tcl_SetPanicProc( TCL_NORETURN1 Tcl_PanicProc *panicProc); EXTERN void Tcl_StaticPackage(Tcl_Interp *interp, - const char *pkgName, + const char *prefix, Tcl_PackageInitProc *initProc, Tcl_PackageInitProc *safeInitProc); EXTERN Tcl_ExitProc *Tcl_SetExitProc(TCL_NORETURN1 Tcl_ExitProc *proc); |