Tcl Source Code

Artifact e4c389be1f2857a51adf97e3e273b77cf69f82d9:

Attachment "3030870.patch" to ticket [3030870fff] added by nijtmans 2010-07-17 14:36:07.

---

Index: generic/tclInt.h
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tclInt.h,v
retrieving revision 1.362.2.12
diff -u -r1.362.2.12 tclInt.h
--- generic/tclInt.h	25 May 2010 10:37:18 -0000	1.362.2.12
+++ generic/tclInt.h	17 Jul 2010 07:31:35 -0000
@@ -1041,6 +1041,7 @@
 				 * meaning of the value is, which we do not
 				 * specify. */
     LocalCache *localCachePtr;
+    VOID *dummy13;
 } CallFrame;
 
 #define FRAME_IS_PROC	0x1
Index: generic/tcl.h
===================================================================
RCS file: /cvsroot/tcl/tcl/generic/tcl.h,v
retrieving revision 1.254.2.14
diff -u -r1.254.2.14 tcl.h
--- generic/tcl.h	29 Jan 2010 09:38:48 -0000	1.254.2.14
+++ generic/tcl.h	17 Jul 2010 07:31:35 -0000
@@ -860,16 +860,17 @@
     Tcl_Namespace *nsPtr;
     int dummy1;
     int dummy2;
-    char *dummy3;
-    char *dummy4;
-    char *dummy5;
+    VOID *dummy3;
+    VOID *dummy4;
+    VOID *dummy5;
     int dummy6;
-    char *dummy7;
-    char *dummy8;
+    VOID *dummy7;
+    VOID *dummy8;
     int dummy9;
-    char *dummy10;
-    char *dummy11;
-    char *dummy12;
+    VOID *dummy10;
+    VOID *dummy11;
+    VOID *dummy12;
+    VOID *dummy13;
 } Tcl_CallFrame;
 
 /*