diff options
author | donal.k.fellows@manchester.ac.uk <dkf> | 2003-11-10 21:02:35 (GMT) |
---|---|---|
committer | donal.k.fellows@manchester.ac.uk <dkf> | 2003-11-10 21:02:35 (GMT) |
commit | e573bb5ea7440ffb424c0496cf957eff4727ac10 (patch) | |
tree | f2d7e13290c29ed8d3059a97cedf97d0be85f00f /generic | |
parent | f2ed1743b3da23e42fa9fc7c0718fc501191ec8b (diff) | |
download | tk-e573bb5ea7440ffb424c0496cf957eff4727ac10.zip tk-e573bb5ea7440ffb424c0496cf957eff4727ac10.tar.gz tk-e573bb5ea7440ffb424c0496cf957eff4727ac10.tar.bz2 |
Minor int vs. unsigned fixes to stop GCC warnings
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tkText.c | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/generic/tkText.c b/generic/tkText.c index 5b9c515..ed826db 100644 --- a/generic/tkText.c +++ b/generic/tkText.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkText.c,v 1.40 2003/11/07 15:36:26 vincentdarley Exp $ + * RCS: @(#) $Id: tkText.c,v 1.41 2003/11/10 21:02:35 dkf Exp $ */ #include "default.h" @@ -688,8 +688,9 @@ TextWidgetObjCmd(clientData, interp, objc, objv) for (i = 2; i < objc-2; i++) { int value; - int length; - CONST char *option = Tcl_GetStringFromObj(objv[i],&length); + unsigned length; + CONST char *option = Tcl_GetStringFromObj(objv[i], + (int *)&length); char c; if (length < 2 || option[0] != '-') { badOption: @@ -1051,7 +1052,7 @@ TextWidgetObjCmd(clientData, interp, objc, objv) if (objc > 3) { name = Tcl_GetStringFromObj(objv[i], &length); if (length > 1 && name[0] == '-') { - if (strncmp("-displaychars", name, length) == 0) { + if (strncmp("-displaychars", name, (unsigned)length)==0) { i++; visible = 1; name = Tcl_GetStringFromObj(objv[i], &length); @@ -4336,7 +4337,8 @@ SearchCore(interp, searchSpecPtr, patObj) p = startOfLine + lastOffset -1; } while (p >= startOfLine + firstOffset) { - if (p[0] == c && !strncmp(p, pattern, matchLength)) { + if (p[0] == c && !strncmp(p, pattern, + (unsigned)matchLength)) { goto backwardsMatch; } p--; |