diff options
author | nijtmans <nijtmans@noemail.net> | 2010-02-15 22:56:19 (GMT) |
---|---|---|
committer | nijtmans <nijtmans@noemail.net> | 2010-02-15 22:56:19 (GMT) |
commit | 260684920859799e9355ce2725795002aae69af4 (patch) | |
tree | 140d3d78d10e4ec6405c364f7a6936a7a07086a5 /generic/tclEnsemble.c | |
parent | 600822ecfefdbc6a08f84fa8f8db6f1c64eea1d6 (diff) | |
download | tcl-260684920859799e9355ce2725795002aae69af4.zip tcl-260684920859799e9355ce2725795002aae69af4.tar.gz tcl-260684920859799e9355ce2725795002aae69af4.tar.bz2 |
reverted earlier rename from tcl*Stubs to
tcl*ConstStubs, it's not necessary at all.
tclEnsemble.c: Fix signed-unsigned mismatch
make tclWinProcs "const"
Add first part of mslu support,
See [Feature Request #2819611]
FossilOrigin-Name: 0d29245dd5206eba5211a17216e65982d0be8923
Diffstat (limited to 'generic/tclEnsemble.c')
-rw-r--r-- | generic/tclEnsemble.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c index 49d0ed9..3108793 100644 --- a/generic/tclEnsemble.c +++ b/generic/tclEnsemble.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclEnsemble.c,v 1.2 2010/02/14 13:37:33 dkf Exp $ + * RCS: @(#) $Id: tclEnsemble.c,v 1.3 2010/02/15 22:56:20 nijtmans Exp $ */ #include "tclInt.h" @@ -2743,7 +2743,7 @@ TclCompileEnsemble( } for (i=0 ; i<len ; i++) { str = Tcl_GetStringFromObj(elems[i], &sclen); - if ((sclen == numBytes) && !memcmp(word, str, numBytes)) { + if ((sclen == (int) numBytes) && !memcmp(word, str, numBytes)) { /* * Exact match! Excellent! */ |