From 0953fe640f177b565578ed7ecc77169ec1a914fa Mon Sep 17 00:00:00 2001
From: Thomas Fitzsimmons <fitzsim@redhat.com>
Date: Fri, 7 Jun 2002 21:59:57 +0000
Subject: 	* libm/common/s_fdim.c: New file. 	* libm/common/s_fma.c:
 Likewise. 	* libm/common/s_fmax.c: Likewise. 	*
 libm/common/s_fmin.c: Likewise. 	* libm/common/s_fpclassify.c:
 Likewise. 	* libm/common/s_lrint.c: Likewise. 	*
 libm/common/s_lround.c: Likewise. 	* libm/common/s_nearbyint.c: Likewise.
 	* libm/common/s_remquo.c: Likewise. 	* libm/common/s_round.c:
 Likewise. 	* libm/common/s_scalbln.c: Likewise. 	*
 libm/common/s_signbit.c: Likewise. 	* libm/common/s_trunc.c: Likewise. 
 * libm/common/sf_fdim.c: Likewise. 	* libm/common/sf_fma.c: Likewise. 
 * libm/common/sf_fmax.c: Likewise. 	* libm/common/sf_fmin.c: Likewise. 
 * libm/common/sf_lrint.c: Likewise. 	* libm/common/sf_lround.c: Likewise. 
 * libm/common/sf_nearbyint.c: Likewise. 	* libm/common/sf_remquo.c:
 Likewise. 	* libm/common/sf_round.c: Likewise. 	*
 libm/common/sf_scalbln.c: Likewise. 	* libm/common/sf_trunc.c: Likewise. 
 * libm/math/w_exp2.c: Likewise. 	* libm/math/w_tgamma.c: Likewise. 
 * libm/math/wf_exp2.c: Likewise. 	* libm/math/wf_tgamma.c: Likewise. 
 * libm/mathfp/s_exp2.c: Likewise. 	* libm/mathfp/s_tgamma.c: Likewise. 
 * libm/mathfp/sf_exp2.c: Likewise. 	* libm/mathfp/sf_tgamma.c: Likewise. 
 * libm/math/er_gamma.c: Fix return value. 	* libm/math/erf_gamma.c:
 Likewise. 	* libm/mathfp/er_gamma.c: Likewise. 	*
 libm/mathfp/erf_gamma.c: Likewise. 	* libc/include/math.h
 (!__STRICT_ANSI__): Include ISOC99-specific 	declarations and macros. 
 Regenerated all Makefile.in, aclocal.m4 and configure files to 	use
 new libtool macros in top-level libtool.m4

---
 newlib/libm/math/w_exp2.c | 71 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)
 create mode 100644 newlib/libm/math/w_exp2.c

(limited to 'newlib/libm/math/w_exp2.c')

diff --git a/newlib/libm/math/w_exp2.c b/newlib/libm/math/w_exp2.c
new file mode 100644
index 000000000..5a0c6edb8
--- /dev/null
+++ b/newlib/libm/math/w_exp2.c
@@ -0,0 +1,71 @@
+
+/* @(#)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.
+ * ====================================================
+ */
+
+/*
+FUNCTION
+	<<exp2>>, <<exp2f>>---exponential
+INDEX
+	exp2
+INDEX
+	exp2f
+
+ANSI_SYNOPSIS
+	#include <math.h>
+	double exp2(double <[x]>);
+	float exp2f(float <[x]>);
+
+TRAD_SYNOPSIS
+	#include <math.h>
+	double exp2(<[x]>);
+	double <[x]>;
+
+	float exp2f(<[x]>);
+	float <[x]>;
+
+DESCRIPTION
+	<<exp2>> and <<exp2f>> calculate 2 ^ <[x]>, that is, 
+	@ifinfo
+	2 raised to the power <[x]>.
+
+	You can use the (non-ANSI) function <<matherr>> to specify
+	error handling for these functions.
+
+RETURNS
+	On success, <<exp2>> and <<exp2f>> return the calculated value.
+	If the result underflows, the returned value is <<0>>.  If the
+	result overflows, the returned value is <<HUGE_VAL>>.  In
+	either case, <<errno>> is set to <<ERANGE>>.
+
+*/
+
+/*
+ * wrapper exp2(x)
+ */
+
+#include "fdlibm.h"
+#include <errno.h>
+#include <math.h>
+
+#ifndef _DOUBLE_IS_32BITS
+
+#ifdef __STDC__
+	double exp2(double x)		/* wrapper exp2 */
+#else
+	double exp2(x)			/* wrapper exp2 */
+	double x;
+#endif
+{
+  return pow(2.0, x);
+}
+
+#endif /* defined(_DOUBLE_IS_32BITS) */
-- 
cgit v1.2.3