diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-29 14:45:41 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-29 14:45:41 (GMT) |
commit | d5378b9bb17b8fa91cba3f283aba26bb91b823cc (patch) | |
tree | 37ed0474848ecf2d676f30a17cd139c8aeb27404 /generic/tkDecls.h | |
parent | c5d27a0ed6296bfcc64b877101bd5c7767dd258b (diff) | |
download | tk-d5378b9bb17b8fa91cba3f283aba26bb91b823cc.zip tk-d5378b9bb17b8fa91cba3f283aba26bb91b823cc.tar.gz tk-d5378b9bb17b8fa91cba3f283aba26bb91b823cc.tar.bz2 |
Make TkCygwinMainEx() MODULE_SCOPE. Make Tk_MainEx TCL_NORETURN1 (which only makes a difference when compiled with Tcl 8.7)
Diffstat (limited to 'generic/tkDecls.h')
-rw-r--r-- | generic/tkDecls.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkDecls.h b/generic/tkDecls.h index 6663d16..91f8332 100644 --- a/generic/tkDecls.h +++ b/generic/tkDecls.h @@ -670,7 +670,7 @@ EXTERN int Tk_GetScrollInfoObj(Tcl_Interp *interp, int objc, EXTERN int Tk_InitOptions(Tcl_Interp *interp, char *recordPtr, Tk_OptionTable optionToken, Tk_Window tkwin); /* 212 */ -EXTERN void Tk_MainEx(int argc, char **argv, +EXTERN TCL_NORETURN1 void Tk_MainEx(int argc, char **argv, Tcl_AppInitProc *appInitProc, Tcl_Interp *interp); /* 213 */ @@ -1106,7 +1106,7 @@ typedef struct TkStubs { int (*tk_GetReliefFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *resultPtr); /* 209 */ int (*tk_GetScrollInfoObj) (Tcl_Interp *interp, int objc, Tcl_Obj *const objv[], double *dblPtr, int *intPtr); /* 210 */ int (*tk_InitOptions) (Tcl_Interp *interp, char *recordPtr, Tk_OptionTable optionToken, Tk_Window tkwin); /* 211 */ - void (*tk_MainEx) (int argc, char **argv, Tcl_AppInitProc *appInitProc, Tcl_Interp *interp); /* 212 */ + TCL_NORETURN1 void (*tk_MainEx) (int argc, char **argv, Tcl_AppInitProc *appInitProc, Tcl_Interp *interp); /* 212 */ void (*tk_RestoreSavedOptions) (Tk_SavedOptions *savePtr); /* 213 */ int (*tk_SetOptions) (Tcl_Interp *interp, char *recordPtr, Tk_OptionTable optionTable, int objc, Tcl_Obj *const objv[], Tk_Window tkwin, Tk_SavedOptions *savePtr, int *maskPtr); /* 214 */ void (*tk_InitConsoleChannels) (Tcl_Interp *interp); /* 215 */ |