texlive[49654] Build/source/utils/autosp: avoid compiler warning

commits+kakuto at tug.org commits+kakuto at tug.org
Thu Jan 10 00:39:45 CET 2019


Revision: 49654
          http://tug.org/svn/texlive?view=revision&revision=49654
Author:   kakuto
Date:     2019-01-10 00:39:45 +0100 (Thu, 10 Jan 2019)
Log Message:
-----------
avoid compiler warning

Modified Paths:
--------------
    trunk/Build/source/utils/autosp/TLpatches/patch-01-binary-write
    trunk/Build/source/utils/autosp/autosp-src/spacing_note.c

Modified: trunk/Build/source/utils/autosp/TLpatches/patch-01-binary-write
===================================================================
--- trunk/Build/source/utils/autosp/TLpatches/patch-01-binary-write	2019-01-09 23:14:12 UTC (rev 49653)
+++ trunk/Build/source/utils/autosp/TLpatches/patch-01-binary-write	2019-01-09 23:39:45 UTC (rev 49654)
@@ -31,6 +31,36 @@
      if (outfile == NULL)
      { fprintf (stderr,"Can't open %s\n", outfilename);
        exit (EXIT_FAILURE);
+diff -ur autosp-2019-01-08/spacing_note.c autosp-src/spacing_note.c
+--- autosp-2019-01-08/spacing_note.c	Wed May 16 22:35:31 2018
++++ autosp-src/spacing_note.c	Thu Jan 10 08:29:36 2019
+@@ -30,7 +30,7 @@
+     update_global_skip (n);
+       /* commas will be discarded by filter_output (i) */
+     if (*s == '.' && new_beaming == 0 && !dottedbeamnotes) 
+-      spacing = spacing * 1.50; 
++      spacing = (int)(spacing * 1.50); 
+     else if ( (*s == '^' || *s == '_' || *s == '=' || *s == '>') 
+               && !vspacing_active[i]  /* is additional spacing needed? */
+             )
+@@ -532,7 +532,7 @@
+    || prefix ("\\qbpp", s) 
+    || prefix ("\\dspp", s) 
+    || doubledotted  )
+-  { spacing *= 1.75; doubledotted = false;}
++  { spacing = (int)(spacing * 1.75); doubledotted = false;}
+   else 
+   if (prefix ("\\whp", s)
+    || prefix ("\\hup", s)
+@@ -556,7 +556,7 @@
+    || prefix ("\\qbp", s) 
+    || prefix ("\\dsp", s) 
+     || dotted  ) 
+-  { spacing *= 1.5; dotted = false; }
++  { spacing = (int)(spacing * 1.5); dotted = false; }
+ 
+   t = strpbrk (s+1, "{\\&|$"); /* collective coding?  */
+   if (*t == '{')  /*  {...}  */
 diff -ur autosp-2019-01-08/tex2aspc.c autosp-src/tex2aspc.c
 --- autosp-2019-01-08/tex2aspc.c	Tue Jan 08 22:28:57 2019
 +++ autosp-src/tex2aspc.c	Thu Jan 10 07:39:45 2019

Modified: trunk/Build/source/utils/autosp/autosp-src/spacing_note.c
===================================================================
--- trunk/Build/source/utils/autosp/autosp-src/spacing_note.c	2019-01-09 23:14:12 UTC (rev 49653)
+++ trunk/Build/source/utils/autosp/autosp-src/spacing_note.c	2019-01-09 23:39:45 UTC (rev 49654)
@@ -30,7 +30,7 @@
     update_global_skip (n);
       /* commas will be discarded by filter_output (i) */
     if (*s == '.' && new_beaming == 0 && !dottedbeamnotes) 
-      spacing = spacing * 1.50; 
+      spacing = (int)(spacing * 1.50); 
     else if ( (*s == '^' || *s == '_' || *s == '=' || *s == '>') 
               && !vspacing_active[i]  /* is additional spacing needed? */
             )
@@ -532,7 +532,7 @@
    || prefix ("\\qbpp", s) 
    || prefix ("\\dspp", s) 
    || doubledotted  )
-  { spacing *= 1.75; doubledotted = false;}
+  { spacing = (int)(spacing * 1.75); doubledotted = false;}
   else 
   if (prefix ("\\whp", s)
    || prefix ("\\hup", s)
@@ -556,7 +556,7 @@
    || prefix ("\\qbp", s) 
    || prefix ("\\dsp", s) 
     || dotted  ) 
-  { spacing *= 1.5; dotted = false; }
+  { spacing = (int)(spacing * 1.5); dotted = false; }
 
   t = strpbrk (s+1, "{\\&|$"); /* collective coding?  */
   if (*t == '{')  /*  {...}  */



More information about the tex-live-commits mailing list