Module Name: src Committed By: joerg Date: Tue Nov 12 17:36:14 UTC 2013
Modified Files: src/lib/libm: Makefile src/lib/libm/src: namespace.h Added Files: src/lib/libm/src: ldbl_dummy.c Log Message: Add some fake long double -> double wrappers for various transcendental functions. They are expected to be implement properly at a later time. To generate a diff of this commit: cvs rdiff -u -r1.146 -r1.147 src/lib/libm/Makefile cvs rdiff -u -r0 -r1.1 src/lib/libm/src/ldbl_dummy.c cvs rdiff -u -r1.7 -r1.8 src/lib/libm/src/namespace.h Please note that diffs are not public domain; they are subject to the copyright notices on the relevant files.
Modified files: Index: src/lib/libm/Makefile diff -u src/lib/libm/Makefile:1.146 src/lib/libm/Makefile:1.147 --- src/lib/libm/Makefile:1.146 Tue Nov 12 16:48:39 2013 +++ src/lib/libm/Makefile Tue Nov 12 17:36:14 2013 @@ -1,4 +1,4 @@ -# $NetBSD: Makefile,v 1.146 2013/11/12 16:48:39 joerg Exp $ +# $NetBSD: Makefile,v 1.147 2013/11/12 17:36:14 joerg Exp $ # # @(#)Makefile 5.1beta 93/09/24 # @@ -159,6 +159,7 @@ COMMON_SRCS+= b_exp.c b_log.c b_tgamma.c e_scalbf.c e_sinh.c e_sinhf.c e_sqrt.c e_sqrtf.c \ k_cos.c k_cosf.c k_rem_pio2.c k_rem_pio2f.c k_sin.c k_sinf.c \ k_standard.c k_tan.c k_tanf.c \ + ldbl_dummy.c \ s_asinh.c s_asinhf.c s_atan.c s_atanf.c s_cbrt.c s_cbrtf.c \ s_ceil.c s_ceilf.c s_ceill.c s_copysign.c s_copysignf.c s_copysignl.c \ s_cos.c s_cosf.c s_erf.c \ Index: src/lib/libm/src/namespace.h diff -u src/lib/libm/src/namespace.h:1.7 src/lib/libm/src/namespace.h:1.8 --- src/lib/libm/src/namespace.h:1.7 Tue Nov 12 16:48:39 2013 +++ src/lib/libm/src/namespace.h Tue Nov 12 17:36:14 2013 @@ -1,4 +1,4 @@ -/* $NetBSD: namespace.h,v 1.7 2013/11/12 16:48:39 joerg Exp $ */ +/* $NetBSD: namespace.h,v 1.8 2013/11/12 17:36:14 joerg Exp $ */ #define atan2 _atan2 #define atan2f _atan2f @@ -50,3 +50,18 @@ #define floorl _floorl #define roundl _roundl #define fmodl _fmodl + +#define exp2l _exp2l +#define cosl _cosl +#define sinl _sinl +#define tanl _tanl +#define powl _powl +#define coshl _coshl +#define sinhl _sinhl +#define acosl _acosl +#define atanl _atanl +#define asinhl _asinhl +#define acoshl _acoshl +#define tanhl _tanhl +#define atanhl _atanhl +#define log10l _log10l Added files: Index: src/lib/libm/src/ldbl_dummy.c diff -u /dev/null src/lib/libm/src/ldbl_dummy.c:1.1 --- /dev/null Tue Nov 12 17:36:14 2013 +++ src/lib/libm/src/ldbl_dummy.c Tue Nov 12 17:36:14 2013 @@ -0,0 +1,175 @@ +/* $NetBSD: ldbl_dummy.c,v 1.1 2013/11/12 17:36:14 joerg Exp $ */ + +/*- + * Copyright (c) 2013 The NetBSD Foundation, Inc. + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS + * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED + * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR + * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS + * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ + +/* + * Simple long double -> double wrappers for various transcendental functions. + * They work neither on the additional range of long double nor do they use + * the additional precision. They exist as stop gap fix for various programs + * picking up long double, e.g. via the C++ run time. + */ + +#include <sys/cdefs.h> +__RCSID("$NetBSD: ldbl_dummy.c,v 1.1 2013/11/12 17:36:14 joerg Exp $"); + +#include "namespace.h" +#include <math.h> + +__weak_alias(atan2l, _atan2l) +__weak_alias(hypotl, _hypotl) +__weak_alias(logl, _logl) +__weak_alias(log10l, _log10l) +__weak_alias(expl, _expl) +__weak_alias(exp2l, _exp2l) +__weak_alias(powl, _powl) +__weak_alias(cosl, _cosl) +__weak_alias(sinl, _sinl) +__weak_alias(tanl, _tanl) +__weak_alias(coshl, _coshl) +__weak_alias(sinhl, _sinhl) +__weak_alias(tanhl, _tanhl) +__weak_alias(acosl, _acosl) +__weak_alias(asinl, _asinl) +__weak_alias(atanl, _atanl) +__weak_alias(acoshl, _acoshl) +__weak_alias(asinhl, _asinhl) +__weak_alias(atanhl, _atanhl) + +long double +atan2l(long double y, long double x) +{ + return atan2(y, x); +} + +long double +hypotl(long double x, long double y) +{ + return hypot(x, y); +} + +long double +logl(long double x) +{ + return log(x); +} + +long double +log10l(long double x) +{ + return log10(x); +} + +long double +expl(long double x) +{ + return exp(x); +} + +long double +exp2l(long double x) +{ + return exp2(x); +} + +long double +powl(long double x, long double y) +{ + return pow(x, y); +} + +long double +cosl(long double x) +{ + return cos(x); +} + +long double +sinl(long double x) +{ + return sin(x); +} + + +long double +tanl(long double x) +{ + return tan(x); +} + +long double +sinhl(long double x) +{ + return sinh(x); +} + +long double +coshl(long double x) +{ + return cosh(x); +} + +long double +tanhl(long double x) +{ + return tanh(x); +} + +long double +acosl(long double x) +{ + return acos(x); +} + +long double +asinl(long double x) +{ + return asin(x); +} + +long double +atanl(long double x) +{ + return atan(x); +} + +long double +asinhl(long double x) +{ + return asinh(x); +} + +long double +acoshl(long double x) +{ + return acosh(x); +} + +long double +atanhl(long double x) +{ + return atanh(x); +}