From 65f5e9823ae71838d1feb41ab1627e61c988aa8c Mon Sep 17 00:00:00 2001
From: Alex Shinn <ashinn@users.noreply.github.com>
Date: Wed, 11 Jul 2012 23:15:23 +0900
Subject: [PATCH] preserving exactness when multiplying a ratio by a complex

---
 opt/bignum.c | 2 --
 1 file changed, 2 deletions(-)

diff --git a/opt/bignum.c b/opt/bignum.c
index 11b619ad..97d8d2b8 100644
--- a/opt/bignum.c
+++ b/opt/bignum.c
@@ -1193,8 +1193,6 @@ sexp sexp_mul (sexp ctx, sexp a, sexp b) {
 #if SEXP_USE_COMPLEX
 #if SEXP_USE_RATIOS
   case SEXP_NUM_RAT_CPX:
-    a = tmp = sexp_make_flonum(ctx, sexp_ratio_to_double(a));
-    /* ... FALLTHROUGH ... */
 #endif
   case SEXP_NUM_FLO_CPX:
   case SEXP_NUM_FIX_CPX: