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

04f7ec69 · Richard M. Stallman · 75c70425 · 04f7ec69
Commit 04f7ec69 authored Mar 30, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/data.c src/data.c +1 -1

No files found.
--- 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);