diff options
author | bde <bde@FreeBSD.org> | 2002-03-26 11:59:29 +0000 |
---|---|---|
committer | bde <bde@FreeBSD.org> | 2002-03-26 11:59:29 +0000 |
commit | 755d0bf04f6bc5a88960b759fbeff6ed789f37b9 (patch) | |
tree | ffda6fa693451722718de741980717e0bef8892b /lib/msun/bsdsrc/b_exp.c | |
parent | 5ff751bb8680caf8634643ee5e0c85c8e6904e24 (diff) | |
download | FreeBSD-src-755d0bf04f6bc5a88960b759fbeff6ed789f37b9.zip FreeBSD-src-755d0bf04f6bc5a88960b759fbeff6ed789f37b9.tar.gz |
Resurrect Lite1's gamma() as C99's tgamma(). Minimal changes.
Diffstat (limited to 'lib/msun/bsdsrc/b_exp.c')
-rw-r--r-- | lib/msun/bsdsrc/b_exp.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/msun/bsdsrc/b_exp.c b/lib/msun/bsdsrc/b_exp.c index 3804766..64d9a3d 100644 --- a/lib/msun/bsdsrc/b_exp.c +++ b/lib/msun/bsdsrc/b_exp.c @@ -117,6 +117,7 @@ ic(lnhuge, 7.1602103751842355450E2, 9, 1.6602B15B7ECF2) ic(lntiny,-7.5137154372698068983E2, 9, -1.77AF8EBEAE354) ic(invln2, 1.4426950408889633870E0, 0, 1.71547652B82FE) +#if 0 double exp(x) double x; { @@ -159,6 +160,7 @@ double x; /* exp(INF) is INF, exp(+big#) overflows to INF */ return( finite(x) ? scalb(1.0,5000) : x); } +#endif /* returns exp(r = x + c) for |c| < |x| with no overlap. */ |