From eca4ac8bf1cbaf7986260afcc12cab542c5f9a2b Mon Sep 17 00:00:00 2001 From: Ed Schouten Date: Thu, 12 Feb 2015 13:28:37 +0100 Subject: [PATCH] Remove the non-standard significand() function. --- i387/Make.files | 7 +++---- i387/s_significand.S | 21 --------------------- i387/s_significandf.S | 22 ---------------------- include/openlibm_math.h | 10 ---------- src/Make.files | 2 +- src/s_significand.c | 30 ------------------------------ src/s_significandf.c | 27 --------------------------- 7 files changed, 4 insertions(+), 115 deletions(-) delete mode 100644 i387/s_significand.S delete mode 100644 i387/s_significandf.S delete mode 100644 src/s_significand.c delete mode 100644 src/s_significandf.c diff --git a/i387/Make.files b/i387/Make.files index 3189957..abfb4fe 100644 --- a/i387/Make.files +++ b/i387/Make.files @@ -1,8 +1,7 @@ $(CUR_SRCS) = e_exp.S e_fmod.S e_log.S e_log10.S \ e_remainder.S e_sqrt.S s_ceil.S s_copysign.S \ s_finite.S s_floor.S s_llrint.S s_logb.S s_lrint.S \ - s_remquo.S s_rint.S s_significand.S s_tan.S \ - s_trunc.S + s_remquo.S s_rint.S s_tan.S s_trunc.S ifneq ($(OS), WINNT) $(CUR_SRCS) += s_scalbn.S s_scalbnf.S s_scalbnl.S @@ -12,11 +11,11 @@ endif $(CUR_SRCS)+= e_log10f.S e_logf.S e_remainderf.S \ e_sqrtf.S s_ceilf.S s_copysignf.S s_floorf.S \ s_llrintf.S s_logbf.S s_lrintf.S \ - s_remquof.S s_rintf.S s_significandf.S s_truncf.S + s_remquof.S s_rintf.S s_truncf.S # long double counterparts $(CUR_SRCS)+= e_remainderl.S e_sqrtl.S s_ceill.S s_copysignl.S \ s_floorl.S s_llrintl.S \ s_logbl.S s_lrintl.S s_remquol.S s_rintl.S s_truncl.S -$(CUR_SRCS)+= fenv.c \ No newline at end of file +$(CUR_SRCS)+= fenv.c diff --git a/i387/s_significand.S b/i387/s_significand.S deleted file mode 100644 index b8552fe..0000000 --- a/i387/s_significand.S +++ /dev/null @@ -1,21 +0,0 @@ -/* - * Written by: - * J.T. Conklin (jtc@netbsd.org) - * Public domain. - */ - -#include -//__FBSDID("$FreeBSD: src/lib/msun/i387/s_significand.S,v 1.10 2011/01/07 16:13:12 kib Exp $") - -ENTRY(significand) - fldl 4(%esp) - fxtract - fstp %st(1) - ret -END(significand) - - -/* Enable stack protection */ -#if defined(__linux__) && defined(__ELF__) -.section .note.GNU-stack,"",%progbits -#endif diff --git a/i387/s_significandf.S b/i387/s_significandf.S deleted file mode 100644 index eca1679..0000000 --- a/i387/s_significandf.S +++ /dev/null @@ -1,22 +0,0 @@ -/* - * Written by J.T. Conklin . - * Public domain. - */ - -#include - -//__FBSDID("$FreeBSD: src/lib/msun/i387/s_significandf.S,v 1.3 2011/01/07 16:13:12 kib Exp $"); -/* RCSID("$NetBSD: s_significandf.S,v 1.3 1995/05/09 00:24:07 jtc Exp $") */ - -ENTRY(significandf) - flds 4(%esp) - fxtract - fstp %st(1) - ret -END(significandf) - - -/* Enable stack protection */ -#if defined(__linux__) && defined(__ELF__) -.section .note.GNU-stack,"",%progbits -#endif diff --git a/include/openlibm_math.h b/include/openlibm_math.h index a3eb614..2113390 100644 --- a/include/openlibm_math.h +++ b/include/openlibm_math.h @@ -317,11 +317,6 @@ double lgamma_r(double, int *); * Single sine/cosine function. */ void sincos(double, double *, double *); - -/* - * IEEE Test Vector - */ -double significand(double); #endif /* __BSD_VISIBLE */ /* float versions of ANSI/POSIX functions */ @@ -415,11 +410,6 @@ float lgammaf_r(float, int *); * Single sine/cosine function. */ void sincosf(float, float *, float *); - -/* - * float version of IEEE Test Vector - */ -float significandf(float); #endif /* __BSD_VISIBLE */ /* diff --git a/src/Make.files b/src/Make.files index 5c75e93..dc930e9 100644 --- a/src/Make.files +++ b/src/Make.files @@ -28,7 +28,7 @@ $(CUR_SRCS) = common.c \ s_nexttowardf.c s_remquo.c s_remquof.c \ s_rint.c s_rintf.c s_round.c s_roundf.c s_roundl.c \ s_scalbln.c s_scalbn.c s_scalbnf.c s_signbit.c \ - s_signgam.c s_significand.c s_significandf.c s_sin.c s_sincos.c \ + s_signgam.c s_sin.c s_sincos.c \ s_sinf.c s_sincosf.c s_tan.c s_tanf.c s_tanh.c s_tanhf.c s_tgammaf.c \ s_trunc.c s_truncf.c s_cpow.c s_cpowf.c \ w_cabs.c w_cabsf.c w_drem.c w_dremf.c diff --git a/src/s_significand.c b/src/s_significand.c deleted file mode 100644 index 61045bc..0000000 --- a/src/s_significand.c +++ /dev/null @@ -1,30 +0,0 @@ -/* @(#)s_signif.c 5.1 93/09/24 */ -/* - * ==================================================== - * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. - * - * Developed at SunPro, a Sun Microsystems, Inc. business. - * Permission to use, copy, modify, and distribute this - * software is freely granted, provided that this notice - * is preserved. - * ==================================================== - */ - -#include "cdefs-compat.h" -//__FBSDID("$FreeBSD: src/lib/msun/src/s_significand.c,v 1.10 2008/02/22 02:30:35 das Exp $"); - -/* - * significand(x) computes just - * scalb(x, (double) -ilogb(x)), - * for exercising the fraction-part(F) IEEE 754-1985 test vector. - */ - -#include - -#include "math_private.h" - -DLLEXPORT double -significand(double x) -{ - return __ieee754_scalb(x,(double) -ilogb(x)); -} diff --git a/src/s_significandf.c b/src/s_significandf.c deleted file mode 100644 index 0ccb9de..0000000 --- a/src/s_significandf.c +++ /dev/null @@ -1,27 +0,0 @@ -/* s_significandf.c -- float version of s_significand.c. - * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. - */ - -/* - * ==================================================== - * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. - * - * Developed at SunPro, a Sun Microsystems, Inc. business. - * Permission to use, copy, modify, and distribute this - * software is freely granted, provided that this notice - * is preserved. - * ==================================================== - */ - -#include "cdefs-compat.h" -//__FBSDID("$FreeBSD: src/lib/msun/src/s_significandf.c,v 1.8 2008/02/22 02:30:36 das Exp $"); - -#include - -#include "math_private.h" - -DLLEXPORT float -significandf(float x) -{ - return __ieee754_scalbf(x,(float) -ilogbf(x)); -}