summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--generic/tk.decls11
-rw-r--r--generic/ttk/ttkStubLib.c7
2 files changed, 12 insertions, 6 deletions
diff --git a/generic/tk.decls b/generic/tk.decls
index 753dea5..12f4afa 100644
--- a/generic/tk.decls
+++ b/generic/tk.decls
@@ -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: tk.decls,v 1.35 2007/12/13 15:24:13 dgp Exp $
+# RCS: @(#) $Id: tk.decls,v 1.36 2008/03/19 16:57:21 das Exp $
library tk
@@ -1159,7 +1159,11 @@ export {
}
export {
CONST char *Tk_PkgInitStubsCheck(Tcl_Interp *interp, CONST char *version,
- int exact);
+ int exact)
+}
+export {
+ const char *TtkInitializeStubs(Tcl_Interp *, const char *version,
+ int epoch, int revision)
}
# Global variables that need to be exported from the tcl shared library.
@@ -1179,3 +1183,6 @@ export {
export {
TkIntXlibStubs *tkIntXlibStubsPtr (fool checkstubs)
}
+export {
+ TtkStubs *ttkStubsPtr (fool checkstubs)
+}
diff --git a/generic/ttk/ttkStubLib.c b/generic/ttk/ttkStubLib.c
index a693fcf..697107a 100644
--- a/generic/ttk/ttkStubLib.c
+++ b/generic/ttk/ttkStubLib.c
@@ -1,5 +1,5 @@
/*
- * $Id: ttkStubLib.c,v 1.2 2006/11/03 03:06:22 das Exp $
+ * $Id: ttkStubLib.c,v 1.3 2008/03/19 16:57:22 das Exp $
* SOURCE: tk/generic/tkStubLib.c, version 1.9 2004/03/17
*/
@@ -8,8 +8,7 @@
#define USE_TTK_STUBS 1
#include "ttkTheme.h"
-MODULE_SCOPE const TtkStubs *ttkStubsPtr;
-const TtkStubs *ttkStubsPtr;
+const TtkStubs *ttkStubsPtr = NULL;
/*
*----------------------------------------------------------------------
@@ -26,7 +25,7 @@ const TtkStubs *ttkStubsPtr;
* Sets the stub table pointer.
*
*/
-MODULE_SCOPE const char *
+const char *
TtkInitializeStubs(
Tcl_Interp *interp, const char *version, int epoch, int revision)
{