summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.c
diff options
context:
space:
mode:
authordas <das>2006-12-01 06:06:01 (GMT)
committerdas <das>2006-12-01 06:06:01 (GMT)
commit2552c3b55665456e393c36dc42e1dd515ad721f4 (patch)
tree561dca62fd98bb74ada0e95b2e726cfaf074e898 /generic/tclCompile.c
parent4efb0e2c9411ff649b81a26e8a9e35f1266c9697 (diff)
downloadtcl-2552c3b55665456e393c36dc42e1dd515ad721f4.zip
tcl-2552c3b55665456e393c36dc42e1dd515ad721f4.tar.gz
tcl-2552c3b55665456e393c36dc42e1dd515ad721f4.tar.bz2
fix warnings
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r--generic/tclCompile.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index 2683cd2..1ebf404 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -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: tclCompile.c,v 1.101 2006/11/28 22:20:28 andreas_kupries Exp $
+ * RCS: @(#) $Id: tclCompile.c,v 1.102 2006/12/01 06:06:01 das Exp $
*/
#include "tclInt.h"
@@ -1281,8 +1281,8 @@ TclCompileScript(
TclMarkList (interp, start, end,
&(exp [wordIdx]),
- &(expLen [wordIdx]),
- &(expItem [wordIdx]));
+ (CONST int**)&(expLen [wordIdx]),
+ (CONST char ***)&(expItem [wordIdx]));
eliterals += exp [wordIdx] ? exp[wordIdx] : 1;