Raymond Toy pushed to branch master at cmucl / cmucl Commits: 82821f30 by Raymond Toy at 2015-08-30T13:34:52Z Remove unused variable "zero". Gets rid of compiler warning too. - - - - - 0e58a8f3 by Raymond Toy at 2015-08-30T13:36:10Z Use enum names in switch statement and fix warning. Instead of using random integers in the switch statement, use the fdlibm enum values. Also fix a compiler warning that ret might be used uninitialized. Fix this by adding a default case, which should never happen. - - - - - 2 changed files: - src/lisp/e_log10.c - src/lisp/setexception.c Changes: ===================================== src/lisp/e_log10.c ===================================== --- a/src/lisp/e_log10.c +++ b/src/lisp/e_log10.c @@ -56,8 +56,6 @@ ivln10 = 4.34294481903251816668e-01, /* 0x3FDBCB7B, 0x1526E50E */ log10_2hi = 3.01029995663611771306e-01, /* 0x3FD34413, 0x509F6000 */ log10_2lo = 3.69423907715893078616e-13; /* 0x3D59FEF3, 0x11F12B36 */ -static double zero = 0.0; - #ifdef __STDC__ double __ieee754_log10(double x) #else ===================================== src/lisp/setexception.c ===================================== --- a/src/lisp/setexception.c +++ b/src/lisp/setexception.c @@ -46,7 +46,7 @@ fdlibm_setexception(double x, enum FDLIBM_EXCEPTION type) double ret; switch (type) { - case 0: + case FDLIBM_DIVIDE_BY_ZERO: /* Division by zero. Use the sign of x to get the correct * signed infinity */ @@ -54,17 +54,17 @@ fdlibm_setexception(double x, enum FDLIBM_EXCEPTION type) ret = copysign(INFINITY, x); break; - case 1: + case FDLIBM_UNDERFLOW: /* Underflow. Use the sign of x to get a signed zero. */ feraiseexcept(FE_UNDERFLOW); ret = copysign(0.0, x); break; - case 2: + case FDLIBM_OVERFLOW: /* overflow */ feraiseexcept(FE_OVERFLOW); ret = copysign(INFINITY, x); break; - case 3: + case FDLIBM_INVALID: { /* invalid */ @@ -88,6 +88,10 @@ fdlibm_setexception(double x, enum FDLIBM_EXCEPTION type) break; } + default: + /* Shouldn't happen! */ + ret = 0.0; + break; } return ret; View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/61adc721e2c97f930ccb8792d...