preserving exactness when multiplying a ratio by a complex

This commit is contained in:
Alex Shinn 2012-07-11 23:15:23 +09:00
parent 884764036b
commit 65f5e9823a

View file

@ -1193,8 +1193,6 @@ sexp sexp_mul (sexp ctx, sexp a, sexp b) {
#if SEXP_USE_COMPLEX #if SEXP_USE_COMPLEX
#if SEXP_USE_RATIOS #if SEXP_USE_RATIOS
case SEXP_NUM_RAT_CPX: case SEXP_NUM_RAT_CPX:
a = tmp = sexp_make_flonum(ctx, sexp_ratio_to_double(a));
/* ... FALLTHROUGH ... */
#endif #endif
case SEXP_NUM_FLO_CPX: case SEXP_NUM_FLO_CPX:
case SEXP_NUM_FIX_CPX: case SEXP_NUM_FIX_CPX: