summaryrefslogtreecommitdiff
path: root/lang/tclX/files/patch-generic_tclXutil.c
diff options
context:
space:
mode:
Diffstat (limited to 'lang/tclX/files/patch-generic_tclXutil.c')
-rw-r--r--lang/tclX/files/patch-generic_tclXutil.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/lang/tclX/files/patch-generic_tclXutil.c b/lang/tclX/files/patch-generic_tclXutil.c
new file mode 100644
index 000000000000..9376b28df0a3
--- /dev/null
+++ b/lang/tclX/files/patch-generic_tclXutil.c
@@ -0,0 +1,20 @@
+--- generic/tclXutil.c.orig 2014-07-30 16:56:00.000000000 +0200
++++ generic/tclXutil.c 2014-07-30 16:56:50.000000000 +0200
+@@ -870,7 +870,7 @@
+ TclX_IsNullObj (objPtr)
+ Tcl_Obj *objPtr;
+ {
+- static Tcl_ObjType *listType = NULL, *stringType = NULL;
++ const static Tcl_ObjType *listType = NULL, *stringType = NULL;
+ int length;
+
+ /*
+@@ -956,7 +956,7 @@
+ {
+ Tcl_Obj **saveObjv;
+ int saveObjc;
+- long flags;
++ long flags = 0;
+
+ if ((Tcl_ListObjGetElements (NULL, saveObjPtr, &saveObjc,
+ &saveObjv) != TCL_OK) ||