godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

oops, do set errno in ldexp() (blanket rules)

Browse Source
This commit is contained in:
eck 1990-12-03 13:09:27 +00:00
parent f99b94ded1
commit 11c958956f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lang/cem/libcc.ansi/math/ldexp.c
View File

@ -6,6 +6,7 @@
#include <math.h> #include <math.h>
#include <float.h> #include <float.h>
#include <errno.h>
double double
ldexp(double fl, int exp) ldexp(double fl, int exp)
@ -22,6 +23,7 @@ ldexp(double fl, int exp)
exp += currexp; exp += currexp;
if (exp > 0) { if (exp > 0) {
if (exp > DBL_MAX_EXP) { if (exp > DBL_MAX_EXP) {
errno = ERANGE;
return sign * HUGE_VAL; return sign * HUGE_VAL;
} }
while (exp>30) { while (exp>30) {