diff options
| author | kargl <kargl@FreeBSD.org> | 2014-09-17 19:01:22 +0000 |
|---|---|---|
| committer | kargl <kargl@FreeBSD.org> | 2014-09-17 19:01:22 +0000 |
| commit | 4044c8d29de600d2b94a48da1b111a18c3f0c0f8 (patch) | |
| tree | cd812f7cced5f8cea889659130d00da95eac7fcd /lib/msun/ld80 | |
| parent | a8c488eae39be7e44747f0f236ce341c19853437 (diff) | |
| download | FreeBSD-src-4044c8d29de600d2b94a48da1b111a18c3f0c0f8.zip FreeBSD-src-4044c8d29de600d2b94a48da1b111a18c3f0c0f8.tar.gz | |
For targets that have a signed zero, lgamma_r(-0, &signgamp) should
set signgamp = -1.
Submitted by: enh at google dot com (e_lgamma[f]_r.c)
Diffstat (limited to 'lib/msun/ld80')
| -rw-r--r-- | lib/msun/ld80/e_lgammal_r.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/msun/ld80/e_lgammal_r.c b/lib/msun/ld80/e_lgammal_r.c index bafa9a3..621b04e 100644 --- a/lib/msun/ld80/e_lgammal_r.c +++ b/lib/msun/ld80/e_lgammal_r.c @@ -261,7 +261,11 @@ lgammal_r(long double x, int *signgamp) *signgamp = 1; if((hx & 0x7fff) == 0x7fff) /* x is +-Inf or NaN */ return x*x; - if((hx==0||hx==0x8000)&&lx==0) return one/vzero; + if((hx==0||hx==0x8000)&&lx==0) { + if (hx&0x8000) + *signgamp = -1; + return one/vzero; + } ENTERI(); |
