diff options
| author | hobbs <hobbs> | 2001-09-21 21:34:10 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2001-09-21 21:34:10 (GMT) |
| commit | 412b35142e73d8049d527706ee3da7c144699e53 (patch) | |
| tree | 583cc81aad13aec41709aa168d6716a5ab8c4b0a /generic | |
| parent | 30d712282f4193c9a32da3dc31aef38bdca5ab22 (diff) | |
| download | tk-412b35142e73d8049d527706ee3da7c144699e53.zip tk-412b35142e73d8049d527706ee3da7c144699e53.tar.gz tk-412b35142e73d8049d527706ee3da7c144699e53.tar.bz2 | |
minor cast fixes to prevent 64bit warnings
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkPack.c | 14 | ||||
| -rw-r--r-- | generic/tkWindow.c | 4 |
2 files changed, 9 insertions, 9 deletions
diff --git a/generic/tkPack.c b/generic/tkPack.c index 01ee852..eeb538a 100644 --- a/generic/tkPack.c +++ b/generic/tkPack.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkPack.c,v 1.10 2001/09/17 23:16:26 dgp Exp $ + * RCS: @(#) $Id: tkPack.c,v 1.11 2001/09/21 21:34:10 hobbs Exp $ */ #include "tkPort.h" @@ -1214,19 +1214,19 @@ PackAfter(interp, prevPtr, masterPtr, objc, objv) c = curOpt[0]; if ((c == 't') - && (strncmp(curOpt, "top", length)) == 0) { + && (strncmp(curOpt, "top", (size_t) length)) == 0) { packPtr->side = TOP; } else if ((c == 'b') - && (strncmp(curOpt, "bottom", length)) == 0) { + && (strncmp(curOpt, "bottom", (size_t) length)) == 0) { packPtr->side = BOTTOM; } else if ((c == 'l') - && (strncmp(curOpt, "left", length)) == 0) { + && (strncmp(curOpt, "left", (size_t) length)) == 0) { packPtr->side = LEFT; } else if ((c == 'r') - && (strncmp(curOpt, "right", length)) == 0) { + && (strncmp(curOpt, "right", (size_t) length)) == 0) { packPtr->side = RIGHT; } else if ((c == 'e') - && (strncmp(curOpt, "expand", length)) == 0) { + && (strncmp(curOpt, "expand", (size_t) length)) == 0) { packPtr->flags |= EXPAND; } else if ((c == 'f') && (strcmp(curOpt, "fill")) == 0) { @@ -1264,7 +1264,7 @@ PackAfter(interp, prevPtr, masterPtr, objc, objv) packPtr->iPadY = 0; index++; } else if ((c == 'f') && (length > 1) - && (strncmp(curOpt, "frame", length) == 0)) { + && (strncmp(curOpt, "frame", (size_t) length) == 0)) { if (optionCount < (index+2)) { Tcl_AppendResult(interp, "wrong # args: \"frame\" ", "option must be followed by anchor point", diff --git a/generic/tkWindow.c b/generic/tkWindow.c index 6869980..3a9f911 100644 --- a/generic/tkWindow.c +++ b/generic/tkWindow.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWindow.c,v 1.35 2001/08/21 20:21:36 pspjuth Exp $ + * RCS: @(#) $Id: tkWindow.c,v 1.36 2001/09/21 21:34:10 hobbs Exp $ */ #include "tkPort.h" @@ -1121,7 +1121,7 @@ Tk_CreateWindowFromPath(interp, tkwin, pathName, screenName) "\"", (char *) NULL); return NULL; } - numChars = p-pathName; + numChars = (int) (p-pathName); if (numChars > FIXED_SPACE) { p = (char *) ckalloc((unsigned) (numChars+1)); } else { |