diff options
| author | kazu <kazu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-02-04 20:01:05 +0000 |
|---|---|---|
| committer | kazu <kazu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-02-04 20:01:05 +0000 |
| commit | 1d60d981c68ff9300acbe0c31fed0028629d1c02 (patch) | |
| tree | 185831442339d40a4a823812a8f40b7ada9974be /gcc/config/rs6000/darwin-ldouble.c | |
| parent | 58552ed0887409a66cffbdca678d249ece213208 (diff) | |
| download | ppe42-gcc-1d60d981c68ff9300acbe0c31fed0028629d1c02.tar.gz ppe42-gcc-1d60d981c68ff9300acbe0c31fed0028629d1c02.zip | |
* config/darwin.c, config/darwin.h, config/freebsd-spec.h,
config/arm/arm.c, config/arm/arm.md,
config/cris/cris-protos.h, config/fr30/fr30.c,
config/fr30/fr30.h, config/h8300/h8300.c, config/i386/i386.h,
config/i860/i860.c, config/i860/i860.h, config/ia64/ia64-c.c,
config/ia64/ia64.c, config/ia64/ia64.h, config/ip2k/ip2k.h,
config/ip2k/ip2k.md, config/ip2k/libgcc.S,
config/m32r/linux.h, config/m32r/m32r.c, config/m32r/m32r.h,
config/m68k/m68k.c, config/m68k/netbsd-elf.h,
config/mips/mips.c, config/mmix/mmix.c, config/mmix/mmix.md,
config/ns32k/netbsd.h, config/ns32k/ns32k.c,
config/ns32k/ns32k.h, config/pdp11/pdp11.h,
config/rs6000/darwin-ldouble.c, config/s390/s390.h,
config/s390/s390.md, config/sparc/netbsd-elf.h,
config/sparc/openbsd.h, config/sparc/sparc.c,
config/xtensa/lib2funcs.S: Fix comment formatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@77268 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/config/rs6000/darwin-ldouble.c')
| -rw-r--r-- | gcc/config/rs6000/darwin-ldouble.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/config/rs6000/darwin-ldouble.c b/gcc/config/rs6000/darwin-ldouble.c index 14492368178..678b93f2392 100644 --- a/gcc/config/rs6000/darwin-ldouble.c +++ b/gcc/config/rs6000/darwin-ldouble.c @@ -95,7 +95,7 @@ _xlqadd (double a, double b, double c, double d) d = tau; } - /* b <- second largest magnitude double. */ + /* b <- second largest magnitude double. */ if (fabs (c) > fabs (b)) { t = b; @@ -104,7 +104,7 @@ _xlqadd (double a, double b, double c, double d) } /* Thanks to commutativity, sum is invariant w.r.t. the next - conditional exchange. */ + conditional exchange. */ tau = d + c; /* Order the smallest magnitude doubles. */ @@ -183,7 +183,7 @@ _xlqdiv (double a, double b, double c, double d) /* Finite nonzero result requires corrections to the highest order term. */ - s = c * t; /* (s,sigma) = c*t exactly. */ + s = c * t; /* (s,sigma) = c*t exactly. */ w = -(-b + d * t); /* Written to get fnmsub for speed, but not numerically necessary. */ @@ -191,10 +191,10 @@ _xlqdiv (double a, double b, double c, double d) asm ("fmsub %0,%1,%2,%3" : "=f"(sigma) : "f"(c), "f"(t), "f"(s)); v = a - s; - tau = ((v-sigma)+w)/c; /* Correction to t. */ + tau = ((v-sigma)+w)/c; /* Correction to t. */ u = t + tau; - /* Construct long double result. */ + /* Construct long double result. */ z.dval[0] = u; z.dval[1] = (t - u) + tau; return z.ldval; |
