diff options
| author | joerg <joerg@NetBSD.org> | 2013-11-12 17:36:14 +0000 |
|---|---|---|
| committer | joerg <joerg@NetBSD.org> | 2013-11-12 17:36:14 +0000 |
| commit | 52d63c49f53adddbc93a36f76f0fb52e40431d43 (patch) | |
| tree | d229c911d750eb923ae01a48bbf21fc48fef1500 /lib/libm/src | |
| parent | 1cad1ac21f6d914ea4e5d0282350b46806efcbf5 (diff) | |
Add some fake long double -> double wrappers for various transcendental
functions. They are expected to be implement properly at a later time.
Diffstat (limited to 'lib/libm/src')
| -rw-r--r-- | lib/libm/src/ldbl_dummy.c | 175 | ||||
| -rw-r--r-- | lib/libm/src/namespace.h | 17 |
2 files changed, 191 insertions, 1 deletions
diff --git a/lib/libm/src/ldbl_dummy.c b/lib/libm/src/ldbl_dummy.c new file mode 100644 index 00000000000..e0df7a44d1c --- /dev/null +++ b/lib/libm/src/ldbl_dummy.c @@ -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); +} diff --git a/lib/libm/src/namespace.h b/lib/libm/src/namespace.h index c3d1114ac29..f4067a8e73b 100644 --- a/lib/libm/src/namespace.h +++ b/lib/libm/src/namespace.h @@ -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 |
