From df31fcd3afdb1a9a37e12d046e8f9b1150d9c6b9 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Sun, 21 Aug 2011 23:55:38 +0900 Subject: [PATCH] typo in sexp_div --- opt/bignum.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/opt/bignum.c b/opt/bignum.c index 12314593..4262f27b 100644 --- a/opt/bignum.c +++ b/opt/bignum.c @@ -1162,7 +1162,7 @@ sexp sexp_div (sexp ctx, sexp a, sexp b) { r = sexp_make_flonum(ctx, sexp_flonum_value(a) / sexp_ratio_to_double(b)); break; case SEXP_NUM_RAT_FLO: - r = sexp_make_flonum(ctx, sexp_ratio_to_double(b) / sexp_flonum_value(a)); + r = sexp_make_flonum(ctx, sexp_ratio_to_double(a) / sexp_flonum_value(b)); break; case SEXP_NUM_RAT_FIX: case SEXP_NUM_RAT_BIG: