summaryrefslogtreecommitdiffstats
path: root/generic
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 /generic
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 'generic')
-rw-r--r--generic/tclDecls.h6
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h
index 675f383..fc9e082 100644
--- a/generic/tclDecls.h
+++ b/generic/tclDecls.h
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclDecls.h,v 1.186 2010/09/16 14:49:37 nijtmans Exp $
+ * RCS: @(#) $Id: tclDecls.h,v 1.187 2010/09/23 21:40:46 nijtmans Exp $
*/
#ifndef _TCLDECLS
@@ -3774,12 +3774,16 @@ extern const TclStubs *tclStubsPtr;
#if defined(USE_TCL_STUBS)
# undef Tcl_CreateInterp
# undef Tcl_FindExecutable
+# undef Tcl_GetStringResult
# undef Tcl_Init
+# undef Tcl_SetPanicProc
# undef Tcl_SetVar
# undef Tcl_StaticPackage
# undef TclFSGetNativePath
# define Tcl_CreateInterp() (tclStubsPtr->tcl_CreateInterp())
+# define Tcl_GetStringResult(interp) (tclStubsPtr->tcl_GetStringResult(interp))
# define Tcl_Init(interp) (tclStubsPtr->tcl_Init(interp))
+# define Tcl_SetPanicProc(proc) (tclStubsPtr->tcl_SetPanicProc(proc))
# define Tcl_SetVar(interp, varName, newValue, flags) \
(tclStubsPtr->tcl_SetVar(interp, varName, newValue, flags))
#endif