Module Name: src
Committed By: drochner
Date: Wed Jan 27 20:23:53 UTC 2010
Modified Files:
src/lib/libm/src: k_standard.c
Log Message:
fix return values for atan2(+-0,+-0) in the POSIX case
To generate a diff of this commit:
cvs rdiff -u -r1.14 -r1.15 src/lib/libm/src/k_standard.c
Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.
Modified files:
Index: src/lib/libm/src/k_standard.c
diff -u src/lib/libm/src/k_standard.c:1.14 src/lib/libm/src/k_standard.c:1.15
--- src/lib/libm/src/k_standard.c:1.14 Wed Jan 20 16:49:42 2010
+++ src/lib/libm/src/k_standard.c Wed Jan 27 20:23:53 2010
@@ -12,7 +12,7 @@
#include <sys/cdefs.h>
#if defined(LIBM_SCCS) && !defined(lint)
-__RCSID("$NetBSD: k_standard.c,v 1.14 2010/01/20 16:49:42 drochner Exp $");
+__RCSID("$NetBSD: k_standard.c,v 1.15 2010/01/27 20:23:53 drochner Exp $");
#endif
#include "math.h"
@@ -137,9 +137,10 @@
exc.type = DOMAIN;
exc.name = type < 100 ? "atan2" : "atan2f";
exc.retval = zero;
- if(_LIB_VERSION == _POSIX_)
+ if(_LIB_VERSION == _POSIX_) {
+ exc.retval = copysign(signbit(y) ? M_PI : zero, x);
errno = EDOM;
- else if (!matherr(&exc)) {
+ } else if (!matherr(&exc)) {
if(_LIB_VERSION == _SVID_) {
(void) WRITE2("atan2: DOMAIN error\n", 20);
}
