Merge core-8-6-branch

tcltk · Jul 23, 2024 · 41f0cfd · 41f0cfd
2 parents 09733fc + d2921ca
commit 41f0cfd
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/generic/tkObj.c b/generic/tkObj.c
@@ -284,7 +284,7 @@ GetPixelsFromObjEx(
     double d;
     PixelRep *pixelPtr;
     static const double bias[] = {
-	1.0L,	10.0L,	25.4L,	3.527777777777777777L /*25.4 / 72.0*/
+	1.0L,	10.0L,	25.4L,	0.3527777777777777777L /*25.4 / 72.0*/
     };
 
     if (objPtr->typePtr != &pixelObjType.objType) {
@@ -642,7 +642,7 @@ Tk_GetMMFromObj(
     double d;
     MMRep *mmPtr;
     static const double bias[] = {
-	10.0,	25.4,	1.0,	0.352777777777777777 /*25.4 / 72.0*/
+	10.0L,	25.4L,	1.0L,	0.352777777777777777L /*25.4 / 72.0*/
     };
 
     if (objPtr->typePtr != &mmObjType.objType) {