(Fmod): Fix the final adjustment, when i2 < 0 and i1 == 0.

diff --git a/src/data.c b/src/data.c
index be10e71f3b5a2896265a2a37bad8e6da46482e93..41f74cb98e1ae698148edcf786d9537390b59561 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -1951,7 +1951,7 @@ Both X and Y must be numbers or markers.")
   i1 %= i2;
 
   /* If the "remainder" comes out with the wrong sign, fix it.  */
-  if ((i1 < 0) != (i2 < 0))
+  if (i2 < 0 ? i1 > 0 : i1 < 0)
     i1 += i2;
 
   XSETINT (val, i1);