From 9859e04cedf4266362a52230a801650cb364f442 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 14 Dec 2009 01:58:56 -0800 Subject: [PATCH] Eliminate use of C99 function copysign; should not be used without testing in configure.ac. --- src/microcode/artutl.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/microcode/artutl.c b/src/microcode/artutl.c index 1bf7ea7f2..0ecf0df4a 100644 --- a/src/microcode/artutl.c +++ b/src/microcode/artutl.c @@ -133,8 +133,10 @@ double_round (double x) ? ((fmod (integral, 2.0)) == 0.0) : (! (0.5 < fractional))) return (integral); + else if (x < 0.0) + return (integral - 1.0); else - return (integral + (copysign (1.0, x))); + return (integral + 1.0); } /* Conversions between Scheme types and Scheme types. */ -- 2.25.1