* libm/complex/catan.c, libm/complex/catanf.c,
libm/complex/ctan.c, libm/complex/ctanf.c: Use HUGE_VAL instead of MAXNUM.
This commit is contained in:
parent
fafea99b35
commit
371a9496e8
|
@ -1,3 +1,9 @@
|
||||||
|
2010-11-29 Ralf Corsépius <ralf.corsepius@rtems.org>
|
||||||
|
|
||||||
|
* libm/complex/catan.c, libm/complex/catanf.c,
|
||||||
|
libm/complex/ctan.c, libm/complex/ctanf.c:
|
||||||
|
Use HUGE_VAL instead of MAXNUM.
|
||||||
|
|
||||||
2010-11-25 Ralf Corsépius <ralf.corsepius@rtems.org>
|
2010-11-25 Ralf Corsépius <ralf.corsepius@rtems.org>
|
||||||
|
|
||||||
* libm/complex/cargf.c: Use crealf instead of creal.
|
* libm/complex/cargf.c: Use crealf instead of creal.
|
||||||
|
|
|
@ -91,8 +91,6 @@ QUICKREF
|
||||||
__weak_alias(catan, _catan)
|
__weak_alias(catan, _catan)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#define MAXNUM 1.0e308
|
|
||||||
|
|
||||||
double complex
|
double complex
|
||||||
catan(double complex z)
|
catan(double complex z)
|
||||||
{
|
{
|
||||||
|
@ -127,6 +125,6 @@ ovrf:
|
||||||
#if 0
|
#if 0
|
||||||
mtherr ("catan", OVERFLOW);
|
mtherr ("catan", OVERFLOW);
|
||||||
#endif
|
#endif
|
||||||
w = MAXNUM + MAXNUM * I;
|
w = HUGE_VAL + HUGE_VAL * I;
|
||||||
return w;
|
return w;
|
||||||
}
|
}
|
||||||
|
|
|
@ -40,8 +40,6 @@
|
||||||
__weak_alias(catanf, _catanf)
|
__weak_alias(catanf, _catanf)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#define MAXNUMF 1.0e38F
|
|
||||||
|
|
||||||
float complex
|
float complex
|
||||||
catanf(float complex z)
|
catanf(float complex z)
|
||||||
{
|
{
|
||||||
|
@ -76,6 +74,6 @@ ovrf:
|
||||||
#if 0
|
#if 0
|
||||||
mtherr ("catan", OVERFLOW);
|
mtherr ("catan", OVERFLOW);
|
||||||
#endif
|
#endif
|
||||||
w = MAXNUMF + MAXNUMF * I;
|
w = HUGE_VALF + HUGE_VALF * I;
|
||||||
return w;
|
return w;
|
||||||
}
|
}
|
||||||
|
|
|
@ -69,8 +69,6 @@ QUICKREF
|
||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include "cephes_subr.h"
|
#include "cephes_subr.h"
|
||||||
|
|
||||||
#define MAXNUM 1.0e308
|
|
||||||
|
|
||||||
double complex
|
double complex
|
||||||
ctan(double complex z)
|
ctan(double complex z)
|
||||||
{
|
{
|
||||||
|
@ -84,7 +82,7 @@ ctan(double complex z)
|
||||||
|
|
||||||
if (d == 0.0) {
|
if (d == 0.0) {
|
||||||
/* mtherr ("ctan", OVERFLOW); */
|
/* mtherr ("ctan", OVERFLOW); */
|
||||||
w = MAXNUM + MAXNUM * I;
|
w = HUGE_VAL + HUGE_VAL * I;
|
||||||
return w;
|
return w;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -36,8 +36,6 @@
|
||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include "cephes_subrf.h"
|
#include "cephes_subrf.h"
|
||||||
|
|
||||||
#define MAXNUMF 1.0e38f
|
|
||||||
|
|
||||||
float complex
|
float complex
|
||||||
ctanf(float complex z)
|
ctanf(float complex z)
|
||||||
{
|
{
|
||||||
|
@ -51,7 +49,7 @@ ctanf(float complex z)
|
||||||
|
|
||||||
if (d == 0.0f) {
|
if (d == 0.0f) {
|
||||||
/* mtherr ("ctan", OVERFLOW); */
|
/* mtherr ("ctan", OVERFLOW); */
|
||||||
w = MAXNUMF + MAXNUMF * I;
|
w = HUGE_VALF + HUGE_VALF * I;
|
||||||
return w;
|
return w;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue