summaryrefslogtreecommitdiffstats
path: root/lib/msun
diff options
context:
space:
mode:
authordes <des@FreeBSD.org>2003-10-25 09:32:18 +0000
committerdes <des@FreeBSD.org>2003-10-25 09:32:18 +0000
commit8c5b85e155e251743fa65a57282ae95e14d63e0d (patch)
tree17ce0ab0bcf0d4438060359497c23cbdcebba6df /lib/msun
parent72898b10e9954cd424e72cbd3cedfb0da9092219 (diff)
downloadFreeBSD-src-8c5b85e155e251743fa65a57282ae95e14d63e0d.zip
FreeBSD-src-8c5b85e155e251743fa65a57282ae95e14d63e0d.tar.gz
- fabsl.c should be named s_fabsl.c for consistency with libmsun's
documented naming scheme (unfortunately the documentation isn't in the tree as far as I can tell); no repocopy is required as there is no history to preserve. - replace simple and almost-correct implementation with slightly hackish but definitely correct implementation (tested on i386, alpha, sparc64) which requires pulling in fpmath.h and the MD _fpmath.h from libc. - try not to make a mess of the Makefile in the process. - enterprising minds are encouraged to implement more C99 long double functions.
Diffstat (limited to 'lib/msun')
-rw-r--r--lib/msun/Makefile9
-rw-r--r--lib/msun/src/s_fabsl.c (renamed from lib/msun/src/fabsl.c)5
2 files changed, 11 insertions, 3 deletions
diff --git a/lib/msun/Makefile b/lib/msun/Makefile
index aa9eda9..667bfcf 100644
--- a/lib/msun/Makefile
+++ b/lib/msun/Makefile
@@ -97,11 +97,16 @@ COMMON_SRCS= b_exp.c b_log.c b_tgamma.c \
w_sinh.c w_sinhf.c w_sqrt.c w_sqrtf.c \
w_y0.c w_y0f.c w_y1.c w_y1f.c w_yn.c w_ynf.c
+# Location of fpmath.h and _fpmath.h
+LIBCDIR= ${.CURDIR}/../libc
+CFLAGS+= -I${LIBCDIR}/include -I${LIBCDIR}/${MACHINE_ARCH}
+
+# C99 long double functions
+COMMON_SRCS+= s_fabsl.c
+
# FreeBSD's C library supplies these functions:
#COMMON_SRCS+= s_fabs.c s_frexp.c s_isnan.c s_ldexp.c s_modf.c
-COMMON_SRCS+= fabsl.c
-
# Exclude the generic versions of what we provide in the MD area.
.if defined(ARCH_SRCS)
.PATH: ${.CURDIR}/${ARCH}
diff --git a/lib/msun/src/fabsl.c b/lib/msun/src/s_fabsl.c
index a78612f..3c986f4 100644
--- a/lib/msun/src/fabsl.c
+++ b/lib/msun/src/s_fabsl.c
@@ -30,8 +30,11 @@
#include <math.h>
+#include "fpmath.h"
+
long double
fabsl(long double x)
{
- return (x < 0) ? -x : x;
+ ((union IEEEl2bits *)&x)->bits.sign = 0;
+ return (x);
}
OpenPOWER on IntegriCloud