diff options
author | das <das> | 2006-12-01 06:06:01 (GMT) |
---|---|---|
committer | das <das> | 2006-12-01 06:06:01 (GMT) |
commit | 2552c3b55665456e393c36dc42e1dd515ad721f4 (patch) | |
tree | 561dca62fd98bb74ada0e95b2e726cfaf074e898 /generic/tclCompile.c | |
parent | 4efb0e2c9411ff649b81a26e8a9e35f1266c9697 (diff) | |
download | tcl-2552c3b55665456e393c36dc42e1dd515ad721f4.zip tcl-2552c3b55665456e393c36dc42e1dd515ad721f4.tar.gz tcl-2552c3b55665456e393c36dc42e1dd515ad721f4.tar.bz2 |
fix warnings
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r-- | generic/tclCompile.c | 6 |
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; |