diff -r 7bc53cf8b2df Modules/_tkinter.c
--- a/Modules/_tkinter.c	Mon Aug 04 11:18:23 2014 -0500
+++ b/Modules/_tkinter.c	Mon Aug 04 16:03:17 2014 -0500
@@ -228,13 +228,13 @@
     int dispatching;
     /* We cannot include tclInt.h, as this is internal.
        So we cache interesting types here. */
-    Tcl_ObjType *BooleanType;
-    Tcl_ObjType *ByteArrayType;
-    Tcl_ObjType *DoubleType;
-    Tcl_ObjType *IntType;
-    Tcl_ObjType *ListType;
-    Tcl_ObjType *ProcBodyType;
-    Tcl_ObjType *StringType;
+    Tcl_ObjType const *BooleanType;
+    Tcl_ObjType const *ByteArrayType;
+    Tcl_ObjType const *DoubleType;
+    Tcl_ObjType const *IntType;
+    Tcl_ObjType const *ListType;
+    Tcl_ObjType const *ProcBodyType;
+    Tcl_ObjType const *StringType;
 } TkappObject;
 
 #define Tkapp_Interp(v) (((TkappObject *) (v))->interp)