Split up the Bessel function wrapper files so that most wrapper functions

are in their own file.

1 files changed, 1 insertions, 30 deletions

diff --git a/lib/msun/src/w_j0f.c b/lib/msun/src/w_j0f.c
index 46ade2f..2c6df51 100644
--- a/lib/msun/src/w_j0f.c
+++ b/lib/msun/src/w_j0f.c
@@ -18,7 +18,7 @@ static char rcsid[] = "$FreeBSD$";
 #endif
 
 /*
- * wrapper j0f(float x), y0f(float x)
+ * wrapper j0f(float x)
  */
 
 #include "math.h"
@@ -43,32 +43,3 @@ static char rcsid[] = "$FreeBSD$";
 	    return z;
 #endif
 }
-
-#ifdef __STDC__
-	float y0f(float x)		/* wrapper y0f */
-#else
-	float y0f(x)			/* wrapper y0f */
-	float x;
-#endif
-{
-#ifdef _IEEE_LIBM
-	return __ieee754_y0f(x);
-#else
-	float z;
-	z = __ieee754_y0f(x);
-	if(_LIB_VERSION == _IEEE_ || isnanf(x) ) return z;
-        if(x <= (float)0.0){
-                if(x==(float)0.0)
-                    /* d= -one/(x-x); */
-                    return (float)__kernel_standard((double)x,(double)x,108);
-                else
-                    /* d = zero/(x-x); */
-                    return (float)__kernel_standard((double)x,(double)x,109);
-        }
-	if(x>(float)X_TLOSS) {
-		/* y0(x>X_TLOSS) */
-	        return (float)__kernel_standard((double)x,(double)x,135);
-	} else
-	    return z;
-#endif
-}