Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-21 14:49:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

typo in sexp_div

Browse source
This commit is contained in:
Alex Shinn 2011-08-21 23:55:38 +09:00
parent 66482788ec
commit df31fcd3af
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
opt/bignum.c
View file

@ -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)); r = sexp_make_flonum(ctx, sexp_flonum_value(a) / sexp_ratio_to_double(b));
break; break;
case SEXP_NUM_RAT_FLO: 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; break;
case SEXP_NUM_RAT_FIX: case SEXP_NUM_RAT_FIX:
case SEXP_NUM_RAT_BIG: case SEXP_NUM_RAT_BIG: