summaryrefslogtreecommitdiffstats
path: root/generic/tcl.h
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tcl.h')
-rw-r--r--generic/tcl.h15
1 files changed, 9 insertions, 6 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index 196468a..5f47734 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -2307,15 +2307,18 @@ typedef unsigned short Tcl_UniChar;
* linked into an application.
*/
-EXTERN CONST char *Tcl_InitStubs _ANSI_ARGS_((Tcl_Interp *interp,
- CONST char *version, int exact, CONST char *tclversion, int magic));
+EXTERN CONST char * Tcl_InitStubs _ANSI_ARGS_((Tcl_Interp *interp,
+ CONST char *version, int exact));
+
+#ifndef USE_TCL_STUBS
+
+/*
+ * When not using stubs, make it a macro.
+ */
-#ifdef USE_TCL_STUBS
-#define Tcl_InitStubs(interp, version, exact) \
- (Tcl_InitStubs)((interp), (version), (exact)|(int)sizeof(int), TCL_VERSION, TCL_STUB_MAGIC)
-#else
#define Tcl_InitStubs(interp, version, exact) \
Tcl_PkgRequire(interp, "Tcl", version, exact)
+
#endif