diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-08 14:41:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-08 14:41:46 (GMT) |
| commit | 404bcc3435d7a5ce178b4b84c86833285d3aa1d4 (patch) | |
| tree | 6536ed8e4e2b792c8a24b07fe63701c5f7bde8c1 /generic/tcl.decls | |
| parent | dbb3b8800c3ddc4749f02953e684ae4104631be1 (diff) | |
| download | tcl-404bcc3435d7a5ce178b4b84c86833285d3aa1d4.zip tcl-404bcc3435d7a5ce178b4b84c86833285d3aa1d4.tar.gz tcl-404bcc3435d7a5ce178b4b84c86833285d3aa1d4.tar.bz2 | |
Decorate Tcl_Exit() and Tcl_SetExitProc()'s argument with TCL_NORETURN as appropriate, as already done with Tcl_Panic() earlier.
Fix minor msvc compiler warning in tclWinFile.c
Diffstat (limited to 'generic/tcl.decls')
| -rw-r--r-- | generic/tcl.decls | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index a5cd24d..797a5a7 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -480,7 +480,7 @@ declare 132 { void Tcl_EventuallyFree(ClientData clientData, Tcl_FreeProc *freeProc) } declare 133 { - void Tcl_Exit(int status) + TCL_NORETURN void Tcl_Exit(int status) } declare 134 { int Tcl_ExposeCommand(Tcl_Interp *interp, const char *hiddenCmdToken, @@ -1872,7 +1872,7 @@ declare 518 { # TIP#121 (exit handler) dkf for Joe Mistachkin declare 519 { - Tcl_ExitProc *Tcl_SetExitProc(Tcl_ExitProc *proc) + Tcl_ExitProc *Tcl_SetExitProc(TCL_NORETURN1 Tcl_ExitProc *proc) } # TIP#143 (resource limits) dkf |