diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-14 10:07:45 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-14 10:07:45 (GMT) |
commit | 58588c714b254c02cfb6f20f808d935673b90cb1 (patch) | |
tree | 8a19ab4e845558e2ca63908bdccfbcf6b7b52a5e | |
parent | f2259f90804f82d58e7edcfc9619567fb0d4ecb7 (diff) | |
download | tk-58588c714b254c02cfb6f20f808d935673b90cb1.zip tk-58588c714b254c02cfb6f20f808d935673b90cb1.tar.gz tk-58588c714b254c02cfb6f20f808d935673b90cb1.tar.bz2 |
Fix warnings seen on MS-VC6 PSDK 2003SP1: C:\test\tk8.6.11_rc0\win\..\win\tkWinFont.c(1500) : warning C4761:
integral size mismatch in argument; conversion supplied
-rw-r--r-- | win/tkWinFont.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tkWinFont.c b/win/tkWinFont.c index 1e1403f..c7520a5 100644 --- a/win/tkWinFont.c +++ b/win/tkWinFont.c @@ -1495,7 +1495,7 @@ MultiFontTextOut( familyPtr = lastSubFontPtr->familyPtr; Tcl_UtfToExternalDString(familyPtr->encoding, source, (int) (p - source), &runString); - familyPtr->textOutProc(hdc, x-((double)tm.tmOverhang/2), y, + familyPtr->textOutProc(hdc, x-(double)(tm.tmOverhang/2), y, (WCHAR *)Tcl_DStringValue(&runString), Tcl_DStringLength(&runString) >> familyPtr->isWideFont); familyPtr->getTextExtentPoint32Proc(hdc, @@ -1517,7 +1517,7 @@ MultiFontTextOut( familyPtr = lastSubFontPtr->familyPtr; Tcl_UtfToExternalDString(familyPtr->encoding, source, (int) (p - source), &runString); - familyPtr->textOutProc(hdc, x-((double)tm.tmOverhang/2), y, + familyPtr->textOutProc(hdc, x-(double)(tm.tmOverhang/2), y, (WCHAR *)Tcl_DStringValue(&runString), Tcl_DStringLength(&runString) >> familyPtr->isWideFont); Tcl_DStringFree(&runString); |