Sophie

Sophie

distrib > Arklinux > devel > x86_64 > by-pkgid > 044ab54737de8e8bb20e21661b8818b3 > files > 2

uClibc-0.9.28-0.10391.1ark.src.rpm

--- uClibc-0.9.27/libm/w_exp2.c.mps	2005-03-12 16:45:05 +0100
+++ uClibc-0.9.27/libm/w_exp2.c	2005-03-12 16:44:57 +0100
@@ -0,0 +1,25 @@
+
+/* @(#)w_exp2.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 "math.h"
+#include "math_private.h"
+
+#ifdef __STDC__
+	double exp2(double x)
+#else
+	double exp2(x)
+	double x;
+#endif
+{
+  return pow(2.0, x);
+}
--- uClibc-0.9.27/libm/Makefile.mps	2005-03-12 16:45:09 +0100
+++ uClibc-0.9.27/libm/Makefile	2005-03-12 16:46:33 +0100
@@ -66,7 +66,7 @@
          s_remquo.c s_rint.c s_round.c s_scalbln.c s_scalbn.c\
          s_signgam.c s_significand.c s_sin.c s_tan.c s_tanh.c s_trunc.c\
          w_acos.c w_acosh.c w_asin.c w_atan2.c w_atanh.c w_cabs.c\
-         w_cosh.c w_drem.c w_exp.c w_fmod.c w_gamma.c w_gamma_r.c\
+         w_cosh.c w_drem.c w_exp.c w_exp2.c w_fmod.c w_gamma.c w_gamma_r.c\
          w_hypot.c w_j0.c w_j1.c w_jn.c w_lgamma.c w_lgamma_r.c\
          w_log.c w_log2.c w_log10.c w_pow.c w_remainder.c w_scalb.c w_sinh.c\
          w_sqrt.c w_tgamma.c fpmacros.c nan.c
--- uClibc-0.9.27/libm/float_wrappers.c.mps	2005-03-12 16:45:15 +0100
+++ uClibc-0.9.27/libm/float_wrappers.c	2005-03-12 16:47:11 +0100
@@ -27,7 +27,6 @@
 /* For the time being, do _NOT_ implement these functions
  * that are defined by SuSv3 */
 #if 0
-float       exp2f(float);
 float       nearbyintf(float);
 float       nexttowardf(float, long double);
 #endif
@@ -48,6 +47,7 @@
 float       coshf(float);
 float       erfcf(float);
 float       erff(float);
+float       exp2f(float);
 float       expf(float);
 float       expm1f(float);
 float       fabsf(float);
@@ -201,14 +201,12 @@
 #endif
 
 
-#if 0
 #ifdef L_exp2f
 float exp2f (float x)
 {
 	return (float) exp2( (double)x );
 }
 #endif
-#endif
 
 
 #ifdef L_expf
--- uClibc-0.9.27/libm/ldouble_wrappers.c.mps	2005-03-12 16:45:20 +0100
+++ uClibc-0.9.27/libm/ldouble_wrappers.c	2005-03-12 16:47:43 +0100
@@ -27,7 +27,6 @@
 /* For the time being, do _NOT_ implement these functions
  * that are defined by SuSv3 */
 #if 0
-long double exp2l(long double);
 long double nearbyintl(long double);
 long double nexttowardl(long double, long double);
 #endif
@@ -48,6 +47,7 @@
 long double cosl(long double);
 long double erfcl(long double);
 long double erfl(long double);
+long double exp2l(long double);
 long double expl(long double);
 long double expm1l(long double);
 long double fabsl(long double);
@@ -201,14 +201,12 @@
 #endif
 
 
-#if 0
 #ifdef L_exp2l
 long double exp2l (long double x)
 {
 	return (long double) exp2( (double)x );
 }
 #endif
-#endif
 
 
 #ifdef L_expl