diff options
| author | dgp <dgp@users.sourceforge.net> | 2003-11-15 03:19:17 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2003-11-15 03:19:17 (GMT) |
| commit | 68735ac31ffa080019e5b986648dbd00e3c11cb6 (patch) | |
| tree | b51b0079c1b0da7fb2d65c87649a459756a38849 /generic/tclParse.c | |
| parent | 8200862cb7c911e184f4b9f35578e67f2000cf11 (diff) | |
| download | tcl-68735ac31ffa080019e5b986648dbd00e3c11cb6.zip tcl-68735ac31ffa080019e5b986648dbd00e3c11cb6.tar.gz tcl-68735ac31ffa080019e5b986648dbd00e3c11cb6.tar.bz2 | |
Added cast to suppress compiler warning.
Diffstat (limited to 'generic/tclParse.c')
| -rw-r--r-- | generic/tclParse.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclParse.c b/generic/tclParse.c index 475f1e9..e86a7d4 100644 --- a/generic/tclParse.c +++ b/generic/tclParse.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclParse.c,v 1.29 2003/11/14 20:44:45 dgp Exp $ + * RCS: @(#) $Id: tclParse.c,v 1.30 2003/11/15 03:19:17 dgp Exp $ */ #include "tclInt.h" @@ -351,7 +351,7 @@ parseWord: */ expPtr = &parsePtr->tokenPtr[expIdx]; - if ( (expPfxLen == expPtr->size) + if ( (expPfxLen == (size_t) expPtr->size) /* Same length as prefix */ && (0 == expandWord) /* Haven't seen prefix already */ |