Skip to content

Commit d6eaf37

Browse files
author
jan.nijtmans
committed
Fix a few -Wconversion warnings
2 parents 2410023 + 2793241 commit d6eaf37

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

generic/tclInt.h

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -4652,7 +4652,7 @@ MODULE_SCOPE const TclFileAttrProcs tclpFileAttrProcs[];
46524652

46534653
/* Token growth tuning, default to the general value. */
46544654
#ifndef TCL_MIN_TOKEN_GROWTH
4655-
#define TCL_MIN_TOKEN_GROWTH TCL_MIN_GROWTH/sizeof(Tcl_Token)
4655+
#define TCL_MIN_TOKEN_GROWTH (TCL_MIN_GROWTH/sizeof(Tcl_Token))
46564656
#endif
46574657

46584658
static inline void
@@ -4669,16 +4669,16 @@ TclGrowParseTokenArray(
46694669
oldPtr = NULL;
46704670
}
46714671
newPtr = (Tcl_Token *)Tcl_AttemptRealloc((char *) oldPtr,
4672-
allocated * sizeof(Tcl_Token));
4672+
(size_t)allocated * sizeof(Tcl_Token));
46734673
if (newPtr == NULL) {
4674-
allocated = needed + append + TCL_MIN_TOKEN_GROWTH;
4674+
allocated = needed + append + (Tcl_Size)TCL_MIN_TOKEN_GROWTH;
46754675
newPtr = (Tcl_Token *)Tcl_Realloc((char *) oldPtr,
4676-
allocated * sizeof(Tcl_Token));
4676+
(size_t)allocated * sizeof(Tcl_Token));
46774677
}
46784678
parsePtr->tokensAvailable = allocated;
46794679
if (oldPtr == NULL) {
46804680
memcpy(newPtr, parsePtr->staticTokens,
4681-
parsePtr->numTokens * sizeof(Tcl_Token));
4681+
(size_t)parsePtr->numTokens * sizeof(Tcl_Token));
46824682
}
46834683
parsePtr->tokenPtr = newPtr;
46844684
}

0 commit comments

Comments
 (0)