Fcalva/OpenLibm
1
0
Fork 0
mirror of https://git.planet-casio.com/Lephenixnoir/OpenLibm.git synced 2024-12-28 04:23:41 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Remove the non-standard finite() function.

Browse source
This commit is contained in:
Ed Schouten 2015-02-12 13:35:19 +01:00
parent ae1e0c309a
commit c08bd962f2
6 changed files with 1 additions and 92 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
i387/Make.files
View file

@ -1,6 +1,6 @@
$(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_floor.S s_llrint.S s_logb.S s_lrint.S \
s_remquo.S s_rint.S s_tan.S s_trunc.S
ifneq ($(OS), WINNT)

23
i387/s_finite.S
View file

@ -1,23 +0,0 @@
/*
* Written by:
* J.T. Conklin (jtc@netbsd.org)
* Public domain.
*/
#include <i387/bsd_asm.h>
//__FBSDID("$FreeBSD: src/lib/msun/i387/s_finite.S,v 1.10 2011/01/07 16:13:12 kib Exp $")
ENTRY(finite)
movl 8(%esp),%eax
andl $0x7ff00000, %eax
cmpl $0x7ff00000, %eax
setneb %al
andl $0x000000ff, %eax
ret
END(finite)
/* Enable stack protection */
#if defined(__linux__) && defined(__ELF__)
.section .note.GNU-stack,"",%progbits
#endif

2
include/openlibm_math.h
View file

@ -303,7 +303,6 @@ double trunc(double);
* BSD math library entry points
*/
#if __BSD_VISIBLE
int finite(double) __pure2;
int isnanf(float) __pure2;
/*
@ -390,7 +389,6 @@ float fminf(float, float) __pure2;
*/
#if __BSD_VISIBLE
float dremf(float, float);
int finitef(float) __pure2;
float j0f(float);
float j1f(float);
float jnf(int, float);

1
src/Make.files
View file

@ -15,7 +15,6 @@ $(CUR_SRCS) = common.c \
s_copysign.c s_copysignf.c s_cos.c s_cosf.c \
s_csqrt.c s_csqrtf.c s_erf.c s_erff.c \
s_exp2.c s_exp2f.c s_expm1.c s_expm1f.c s_fabs.c s_fabsf.c s_fdim.c \
s_finite.c s_finitef.c \
s_floor.c s_floorf.c s_fma.c s_fmaf.c \
s_fmax.c s_fmaxf.c s_fmin.c \
s_fminf.c s_fpclassify.c \

31
src/s_finite.c
View file

@ -1,31 +0,0 @@
/* @(#)s_finite.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_finite.c,v 1.9 2008/02/22 02:30:35 das Exp $");
/*
* finite(x) returns 1 is x is finite, else 0;
* no branching!
*/
#include <openlibm_math.h>
#include "math_private.h"
DLLEXPORT int
finite(double x)
{
int32_t hx;
GET_HIGH_WORD(hx,x);
return (int)((u_int32_t)((hx&0x7fffffff)-0x7ff00000)>>31);
}

34
src/s_finitef.c
View file

@ -1,34 +0,0 @@
/* s_finitef.c -- float version of s_finite.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_finitef.c,v 1.7 2008/02/22 02:30:35 das Exp $");
/*
* finitef(x) returns 1 is x is finite, else 0;
* no branching!
*/
#include <openlibm_math.h>
#include "math_private.h"
DLLEXPORT int
finitef(float x)
{
int32_t ix;
GET_FLOAT_WORD(ix,x);
return (int)((u_int32_t)((ix&0x7fffffff)-0x7f800000)>>31);
}