Tue Jun 4 22:03:02 1996 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* sysdeps/m68k/fpu/acos.c: File removed. * sysdeps/m68k/fpu/asin.c: File removed. * sysdeps/m68k/fpu/atan.c: File removed. * sysdeps/m68k/fpu/atan2.c: File removed. * sysdeps/m68k/fpu/atanh.c: File removed. * sysdeps/m68k/fpu/ceil.c: File removed. * sysdeps/m68k/fpu/cos.c: File removed. * sysdeps/m68k/fpu/cosh.c: File removed. * sysdeps/m68k/fpu/drem.c: File removed. * sysdeps/m68k/fpu/exp.c: File removed. * sysdeps/m68k/fpu/expm1.c: File removed. * sysdeps/m68k/fpu/fabs.c: File removed. * sysdeps/m68k/fpu/fl.h: File removed. * sysdeps/m68k/fpu/floor.c: File removed. * sysdeps/m68k/fpu/fmod.c: File removed. * sysdeps/m68k/fpu/frexp.c: File removed. * sysdeps/m68k/fpu/isinf.c: File removed. * sysdeps/m68k/fpu/isinfl.c: File removed. * sysdeps/m68k/fpu/isnan.c: File removed. * sysdeps/m68k/fpu/isnanl.c: File removed. * sysdeps/m68k/fpu/ldexp.c: File removed. * sysdeps/m68k/fpu/log.c: File removed. * sysdeps/m68k/fpu/log10.c: File removed. * sysdeps/m68k/fpu/log1p.c: File removed. * sysdeps/m68k/fpu/logb.c: File removed. * sysdeps/m68k/fpu/pow.c: File removed. * sysdeps/m68k/fpu/rint.c: File removed. * sysdeps/m68k/fpu/sin.c: File removed. * sysdeps/m68k/fpu/sinh.c: File removed. * sysdeps/m68k/fpu/sqrt.c: File removed. * sysdeps/m68k/fpu/tan.c: File removed. * sysdeps/m68k/fpu/tanh.c: File removed.
This commit is contained in:
parent
75b683dffd
commit
3ba647e7a4
|
@ -1,32 +0,0 @@
|
|||
/* Copyright (C) 1991, 1994 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
#ifndef FUNC
|
||||
#define FUNC acos
|
||||
#endif
|
||||
|
||||
|
||||
double
|
||||
DEFUN(FUNC, (x), double x)
|
||||
{
|
||||
return __m81_u(FUNC)(x);
|
||||
}
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC asin
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC atan
|
||||
#include <acos.c>
|
|
@ -1,71 +0,0 @@
|
|||
/* Copyright (C) 1991, 1992, 1994 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#include <math.h>
|
||||
|
||||
#ifdef __GNUC__
|
||||
|
||||
double
|
||||
DEFUN(atan2, (y, x), double y AND double x)
|
||||
{
|
||||
static CONST double one = 1.0, zero = 0.0;
|
||||
double signx, signy;
|
||||
double pi, PIo4, PIo2;
|
||||
|
||||
if (__isnan(x))
|
||||
return x;
|
||||
if (__isnan(y))
|
||||
return y;
|
||||
|
||||
signy = __copysign(one, y);
|
||||
signx = __copysign(one, x);
|
||||
|
||||
asm("fmovecr%.x %1, %0" : "=f" (pi) : "i" (0));
|
||||
PIo2 = pi / 2;
|
||||
PIo4 = pi / 4;
|
||||
|
||||
if (y == zero)
|
||||
return signx == one ? y : __copysign(pi, signy);
|
||||
|
||||
if (x == zero)
|
||||
return __copysign(PIo2, signy);
|
||||
|
||||
if (__isinf(x))
|
||||
{
|
||||
if (__isinf(y))
|
||||
return __copysign(signx == one ? PIo4 : 3 * PIo4, signy);
|
||||
else
|
||||
return __copysign(signx == one ? zero : pi, signy);
|
||||
}
|
||||
|
||||
if (__isinf(y))
|
||||
return __copysign(PIo2, signy);
|
||||
|
||||
y = fabs(y);
|
||||
|
||||
if (x < 0.0)
|
||||
/* X is negative. */
|
||||
return __copysign(pi - atan(y / -x), signy);
|
||||
|
||||
return __copysign(atan(y / x), signy);
|
||||
}
|
||||
|
||||
#else
|
||||
#include <sysdeps/generic/atan2.c>
|
||||
#endif
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC atanh
|
||||
#include <acos.c>
|
|
@ -1,4 +0,0 @@
|
|||
|
||||
#define FUNC ceil
|
||||
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC cos
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC cosh
|
||||
#include <acos.c>
|
|
@ -1,31 +0,0 @@
|
|||
/* Copyright (C) 1991, 1992, 1994, 1995 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
#undef drem
|
||||
|
||||
double
|
||||
DEFUN(__drem, (x, y), double x AND double y)
|
||||
{
|
||||
return ____drem(x, y);
|
||||
}
|
||||
|
||||
weak_alias (__drem, drem)
|
|
@ -1,3 +0,0 @@
|
|||
#define FUNC exp
|
||||
#define OP etox
|
||||
#include <acos.c>
|
|
@ -1,3 +0,0 @@
|
|||
#define FUNC __expm1
|
||||
#define OP expm1
|
||||
#include <acos.c>
|
|
@ -1,3 +0,0 @@
|
|||
#define FUNC fabs
|
||||
#define OP abs
|
||||
#include <acos.c>
|
|
@ -1,41 +0,0 @@
|
|||
/* Floating-point constants for the 68881.
|
||||
Copyright (C) 1992 Free Software Foundation, Inc. */
|
||||
|
||||
/* IGNORE($ This is used internally in the library. */
|
||||
#include <sysdeps/ieee754/fl.h>
|
||||
/* ansidecl.m4 here inserts the ieee file. Kludge o rama.
|
||||
$) ENDCOMMENT INCLUDE($sysdeps/ieee754/fl.h$) STARTCOMMENT */
|
||||
|
||||
#ifndef __need_HUGE_VAL
|
||||
|
||||
#ifdef __GNUC__
|
||||
|
||||
#undef FLT_ROUNDS
|
||||
|
||||
/* Interrogate the 68881 to find the current rounding mode. */
|
||||
|
||||
static __const __inline int
|
||||
DEFUN_VOID(__flt_rounds)
|
||||
{
|
||||
unsigned long int __fpcr;
|
||||
__asm("fmove%.l fpcr, %0" : "=g" (__fpcr));
|
||||
switch (__fpcr & (1 | 2))
|
||||
{
|
||||
case 0:
|
||||
return _FLT_ROUNDS_TONEAREST;
|
||||
case 1:
|
||||
return _FLT_ROUNDS_TOZERO;
|
||||
case 2:
|
||||
return _FLT_ROUNDS_TONEGINF;
|
||||
case 3:
|
||||
return _FLT_ROUNDS_TOPOSINF;
|
||||
default:
|
||||
return _FLT_ROUNDS_INDETERMINATE;
|
||||
}
|
||||
}
|
||||
|
||||
#define FLT_ROUNDS (__flt_rounds())
|
||||
|
||||
#endif /* GCC. */
|
||||
|
||||
#endif /* Don't need HUGE_VAL. */
|
|
@ -1,3 +0,0 @@
|
|||
#define FUNC floor
|
||||
#define OP intrz
|
||||
#include <acos.c>
|
|
@ -1,27 +0,0 @@
|
|||
/* Copyright (C) 1991, 1994 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
double
|
||||
DEFUN(fmod, (x, y), double x AND double y)
|
||||
{
|
||||
return __fmod(x, y);
|
||||
}
|
|
@ -1,27 +0,0 @@
|
|||
/* Copyright (C) 1991 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
double
|
||||
DEFUN(frexp, (value, expptr), double value AND int *expptr)
|
||||
{
|
||||
return __frexp(value, expptr);
|
||||
}
|
|
@ -1,34 +0,0 @@
|
|||
/* Copyright (C) 1991, 1994, 1995 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
#ifndef FUNC
|
||||
#define FUNC __isinf
|
||||
#endif
|
||||
|
||||
|
||||
int
|
||||
DEFUN(FUNC, (x), double x)
|
||||
{
|
||||
return __m81_u(FUNC)(x);
|
||||
}
|
||||
|
||||
weak_alias (__isinf, isinf)
|
|
@ -1,28 +0,0 @@
|
|||
/* Copyright (C) 1996 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#include <math.h>
|
||||
|
||||
int
|
||||
DEFUN(__isinfl, (x), long double x)
|
||||
{
|
||||
return __m81_u(__isinfl)(x);
|
||||
}
|
||||
|
||||
weak_alias (__isinfl, isinfl)
|
|
@ -1,4 +0,0 @@
|
|||
#define FUNC __isnan
|
||||
#include <isinf.c>
|
||||
|
||||
weak_alias (__isnan, isnan)
|
|
@ -1,28 +0,0 @@
|
|||
/* Copyright (C) 1996 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#include <math.h>
|
||||
|
||||
int
|
||||
DEFUN(__isnanl, (x), long double x)
|
||||
{
|
||||
return __m81_u(__isnanl)(x);
|
||||
}
|
||||
|
||||
weak_alias (__isnanl, isnanl)
|
|
@ -1,27 +0,0 @@
|
|||
/* Copyright (C) 1991, 1994 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
double
|
||||
DEFUN(ldexp, (x, exp), double x AND int exp)
|
||||
{
|
||||
return __ldexp(x, exp);
|
||||
}
|
|
@ -1,3 +0,0 @@
|
|||
#define FUNC log
|
||||
#define OP logn
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC log10
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC log1p
|
||||
#include <acos.c>
|
|
@ -1,46 +0,0 @@
|
|||
/* Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#include <math.h>
|
||||
|
||||
#ifdef __GNUC__
|
||||
|
||||
/* Return the base 2 signed integral exponent of X. */
|
||||
|
||||
double
|
||||
DEFUN(__logb, (x), double x)
|
||||
{
|
||||
if (__isnan (x))
|
||||
return x;
|
||||
if (__isinf (x))
|
||||
return fabs (x);
|
||||
|
||||
if (x == 0.0)
|
||||
asm ("flog2%.x %0, %0" : "=f" (x) : "0" (x));
|
||||
else
|
||||
asm ("fgetexp%.x %0, %0" : "=f" (x) : "0" (x));
|
||||
|
||||
return x;
|
||||
}
|
||||
|
||||
weak_alias (__logb, logb)
|
||||
|
||||
#else
|
||||
#include <sysdeps/ieee754/logb.c>
|
||||
#endif
|
|
@ -1,27 +0,0 @@
|
|||
/* Copyright (C) 1991, 1994 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If
|
||||
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
||||
Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <ansidecl.h>
|
||||
#define __NO_MATH_INLINES
|
||||
#include <math.h>
|
||||
|
||||
double
|
||||
DEFUN(pow, (x, y), double x AND double y)
|
||||
{
|
||||
return __pow(x, y);
|
||||
}
|
|
@ -1,5 +0,0 @@
|
|||
#define FUNC __rint
|
||||
#define OP intr
|
||||
#include <acos.c>
|
||||
|
||||
weak_alias (__rint, rint)
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC sin
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC sinh
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC sqrt
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC tan
|
||||
#include <acos.c>
|
|
@ -1,2 +0,0 @@
|
|||
#define FUNC tanh
|
||||
#include <acos.c>
|
Loading…
Reference in a new issue