[Git][cmucl/cmucl][master] Fix compiler warning about else
Raymond Toy
rtoy at common-lisp.net
Thu Aug 31 04:22:36 UTC 2017
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
3b4f3977 by Raymond Toy at 2017-08-30T21:21:56-07:00
Fix compiler warning about else
Add braces around the else clause that's indented as if it were part
of the else clause. Inspection of the algorithm indicates that this
is probably the intended code and in this case doesn't change what
gets executed because the following statements would have been anyway.
Also verified a few random values that `(asin x)` and `(asin (float x
1w0))` produce the same values. Only need to test 2^-27 <= x < 0.5.
- - - - -
1 changed file:
- src/lisp/e_asin.c
Changes:
=====================================
src/lisp/e_asin.c
=====================================
--- a/src/lisp/e_asin.c
+++ b/src/lisp/e_asin.c
@@ -94,12 +94,13 @@ qS4 = 7.70381505559019352791e-02; /* 0x3FB3B8C5, 0xB12E9282 */
}
return x;
- } else
+ } else {
t = x*x;
p = t*(pS0+t*(pS1+t*(pS2+t*(pS3+t*(pS4+t*pS5)))));
q = one+t*(qS1+t*(qS2+t*(qS3+t*qS4)));
w = p/q;
return x+x*w;
+ }
}
/* 1> |x|>= 0.5 */
w = one-fabs(x);
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/3b4f3977d3260cb81c41c1d155e1291ebb13a52b
---
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/3b4f3977d3260cb81c41c1d155e1291ebb13a52b
You're receiving this email because of your account on gitlab.common-lisp.net.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20170831/9fd145b6/attachment.html>
More information about the cmucl-cvs
mailing list