summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-09-23 21:40:45 (GMT)
committernijtmans <nijtmans>2010-09-23 21:40:45 (GMT)
commita186bdb4397f2d831f6bb04e453fdf14e21c9c97 (patch)
tree1a72c5d9af6e0014b67853684fda5e42710dcef6 /unix
parent8691a6254e1afce0248c4ff5807236e23e1167a0 (diff)
downloadtcl-a186bdb4397f2d831f6bb04e453fdf14e21c9c97.zip
tcl-a186bdb4397f2d831f6bb04e453fdf14e21c9c97.tar.gz
tcl-a186bdb4397f2d831f6bb04e453fdf14e21c9c97.tar.bz2
Make Tcl_SetPanicProc and Tcl_GetStringResult callable without stubs, just as Tcl_SetVar.
Diffstat (limited to 'unix')
-rw-r--r--unix/tclAppInit.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tclAppInit.c b/unix/tclAppInit.c
index 297a83a..a74fec8 100644
--- a/unix/tclAppInit.c
+++ b/unix/tclAppInit.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclAppInit.c,v 1.23 2010/09/23 09:18:59 nijtmans Exp $
+ * RCS: @(#) $Id: tclAppInit.c,v 1.24 2010/09/23 21:40:46 nijtmans Exp $
*/
#include "tcl.h"
@@ -104,7 +104,7 @@ int
Tcl_AppInit(
Tcl_Interp *interp) /* Interpreter for application. */
{
- if (Tcl_Init(interp) == TCL_ERROR) {
+ if ((Tcl_Init)(interp) == TCL_ERROR) {
return TCL_ERROR;
}