texlive[44880] Build/source/texk/makejvf: makejvf: trivial fix to

[commits+hironobu at tug.org]

Revision: 44880
          http://tug.org/svn/texlive?view=revision&revision=44880
Author:   hironobu
Date:     2017-07-24 13:32:52 +0200 (Mon, 24 Jul 2017)
Log Message:
-----------
makejvf: trivial fix to avoid round-off error on i386

Modified Paths:
--------------
    trunk/Build/source/texk/makejvf/ChangeLog
    trunk/Build/source/texk/makejvf/write.c

Modified: trunk/Build/source/texk/makejvf/ChangeLog
===================================================================
--- trunk/Build/source/texk/makejvf/ChangeLog	2017-07-24 00:21:18 UTC (rev 44879)
+++ trunk/Build/source/texk/makejvf/ChangeLog	2017-07-24 11:32:52 UTC (rev 44880)
@@ -1,3 +1,9 @@
+2017-07-23  Hironobu Yamashita  <h.y.acetaminophen at gmail.com>
+
+	* write.c: Trivial change to avoid round-off error in
+	tmin10.vf test on i386 environment. Report from Mojca:
+	http://tug.org/pipermail/tlbuild/2017q3/003866.html
+
 2017-07-20  Hironobu Yamashita  <h.y.acetaminophen at gmail.com>
 
 	makejvf version 20170720.

Modified: trunk/Build/source/texk/makejvf/write.c
===================================================================
--- trunk/Build/source/texk/makejvf/write.c	2017-07-24 00:21:18 UTC (rev 44879)
+++ trunk/Build/source/texk/makejvf/write.c	2017-07-24 11:32:52 UTC (rev 44880)
@@ -122,7 +122,7 @@
 				skip2+=-(int)((0.65)*zh);
 			}
 			else {
-				skip2+=-(int)((0.6)*zh);
+				skip2+=-(int)(zh*3/5.0); /* skip2+=-(int)((0.6)*zh); */
 			}
 
 			if (kanatfm)
@@ -190,7 +190,7 @@
 				skip2+=(int)((0.65)*zh);
 			}
 			else {
-				skip2+=(int)((0.6)*zh);
+				skip2+=(int)(zh*3/5.0); /* skip2+=(int)((0.6)*zh); */
 			}
 
 			if (kanatfm)