texlive[44252] Build/source/texk/dvipdfm-x: dvipdfm-x/pdfdraw.c;

[commits+kakuto at tug.org]

Revision: 44252
          http://tug.org/svn/texlive?view=revision&revision=44252
Author:   kakuto
Date:     2017-05-09 00:31:04 +0200 (Tue, 09 May 2017)
Log Message:
-----------
dvipdfm-x/pdfdraw.c; Replace s small number 1.e-8 by OUR_EPSILON (=2.5e-16)

Modified Paths:
--------------
    trunk/Build/source/texk/dvipdfm-x/ChangeLog
    trunk/Build/source/texk/dvipdfm-x/pdfdraw.c

Modified: trunk/Build/source/texk/dvipdfm-x/ChangeLog
===================================================================
--- trunk/Build/source/texk/dvipdfm-x/ChangeLog	2017-05-08 21:31:12 UTC (rev 44251)
+++ trunk/Build/source/texk/dvipdfm-x/ChangeLog	2017-05-08 22:31:04 UTC (rev 44252)
@@ -1,3 +1,9 @@
+2017-05-08  Akira Kakuto  <kakuto at fuk.kindai.ac.jp>
+
+	* pdfdraw.c: Replace a small number 1.0e-8 by OUR_EPSILON = 2.5e-16,
+	responding incompletely to
+	http://tug.org/pipermail/tex-live/2017-May/040090.html.
+
 2017-04-26  Paul Vojta  <vojta at math.berkeley.edu>
 
 	* dvi.c, dvipdfmx.c, spc_html.c, spc_util.c: Support additional

Modified: trunk/Build/source/texk/dvipdfm-x/pdfdraw.c
===================================================================
--- trunk/Build/source/texk/dvipdfm-x/pdfdraw.c	2017-05-08 21:31:12 UTC (rev 44251)
+++ trunk/Build/source/texk/dvipdfm-x/pdfdraw.c	2017-05-08 22:31:04 UTC (rev 44252)
@@ -1,6 +1,6 @@
 /* This is dvipdfmx, an eXtended version of dvipdfm by Mark A. Wicks.
 
-    Copyright (C) 2002-2016 by Jin-Hwan Cho and Shunsaku Hirata,
+    Copyright (C) 2002-2017 by Jin-Hwan Cho and Shunsaku Hirata,
     the dvipdfmx project team.
     
     Copyright (C) 1998, 1999 by Mark A. Wicks <mwicks at kettering.edu>
@@ -39,6 +39,7 @@
 
 #include "pdfdraw.h"
 
+#define OUR_EPSILON 2.5e-16
 
 /*
  * Numbers are rounding to 0-5 fractional digits
@@ -54,7 +55,7 @@
   double  det;
 
   det = detP(M);
-  if (fabs(det) < 1.e-8) {
+  if (fabs(det) < OUR_EPSILON) {
     WARN("Inverting matrix with zero determinant...");
     return -1; /* result is undefined. */
   }
@@ -191,7 +192,7 @@
   ASSERT(M);
 
   det = detP(M);
-  if (fabs(det) < 1.e-8) {
+  if (fabs(det) < OUR_EPSILON) {
     WARN("Inverting matrix with zero determinant...");
     W.a = 1.0; W.c = 0.0;
     W.b = 0.0; W.d = 1.0;
@@ -539,8 +540,8 @@
   int         n_c; /* number of segments */
   int         i, error = 0;
 
-  if (fabs(r_x) < 1.e-8 ||
-      fabs(r_y) < 1.e-8)
+  if (fabs(r_x) < OUR_EPSILON ||
+      fabs(r_y) < OUR_EPSILON)
     return -1;
 
   if (a_d < 0) {
@@ -552,7 +553,7 @@
   d_a  = a_1 - a_0;
   for (n_c = 1; fabs(d_a) > 90.0 * n_c; n_c++);
   d_a /= n_c;
-  if (fabs(d_a) < 1.e-8)
+  if (fabs(d_a) < OUR_EPSILON)
     return -1;
 
   a_0 *= M_PI / 180.0;
@@ -712,7 +713,7 @@
 static /* __inline__ */ int
 INVERTIBLE_MATRIX (const pdf_tmatrix *M)
 {
-  if (fabs(detP(M)) < 1.e-8) {
+  if (fabs(detP(M)) < OUR_EPSILON) {
     WARN("Transformation matrix not invertible.");
     WARN("--- M = [%g %g %g %g %g %g]",
          M->a, M->b, M->c, M->d, M->e, M->f);
@@ -1315,7 +1316,7 @@
   /* Adobe Reader erases page content if there are
    * non invertible transformation.
    */
-  if (fabs(detP(M)) < 1.0e-8) {
+  if (fabs(detP(M)) < OUR_EPSILON) {
     WARN("Transformation matrix not invertible.");
     WARN("--- M = [%g %g %g %g %g %g]",
          M->a, M->b, M->c, M->d, M->e, M->f);
@@ -1322,9 +1323,9 @@
     return -1;
   }
 
-  if (fabs(M->a - 1.0) > 1.e-8 || fabs(M->b) > 1.e-8
-   || fabs(M->c) > 1.e-8 || fabs(M->d - 1.0) > 1.e-8
-   || fabs(M->e) > 1.e-8 || fabs(M->f) > 1.e-8) {
+  if (fabs(M->a - 1.0) > OUR_EPSILON || fabs(M->b) > OUR_EPSILON
+   || fabs(M->c) > OUR_EPSILON || fabs(M->d - 1.0) > OUR_EPSILON
+   || fabs(M->e) > OUR_EPSILON || fabs(M->f) > OUR_EPSILON) {
     buf[len++] = ' ';
     len += pdf_sprint_matrix(buf + len, M);
     buf[len++] = ' ';