Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 13:16:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixing overflow checking in certain cases in bignum addition.

Browse source 
(patch from Lorenzo)
This commit is contained in:
Alex Shinn 2012-12-31 10:51:42 +09:00
parent 6a9725996b
commit c0b257db25
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
bignum.c
View file

@ -344,7 +344,7 @@ sexp sexp_bignum_add_digits (sexp ctx, sexp dst, sexp a, sexp b) {
carry = (n > (SEXP_UINT_T_MAX - bdata[i]) ? 1 : 0); carry = (n > (SEXP_UINT_T_MAX - bdata[i]) ? 1 : 0);
} }
for ( ; carry && (i<alen); i++) { for ( ; carry && (i<alen); i++) {
carry = (cdata[i] == SEXP_UINT_T_MAX-1 ? 1 : 0); carry = (cdata[i] == SEXP_UINT_T_MAX ? 1 : 0);
cdata[i]++; cdata[i]++;
} }
if (carry) { if (carry) {