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

avoid // comments

Browse source
This commit is contained in:
Alex Shinn 2020-07-28 15:13:38 +09:00
parent 23e62275df
commit 113560aeb7
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
include/chibi/bignum.h
View file

@ -220,7 +220,7 @@ static inline sexp_luint_t luint_add(sexp_luint_t a, sexp_luint_t b) {
uint64_t sumHiHi = (aHiHi + bHiHi) + carry; uint64_t sumHiHi = (aHiHi + bHiHi) + carry;
uint64_t resultHiHi = sumHiHi & 0xFFFFFFFF; uint64_t resultHiHi = sumHiHi & 0xFFFFFFFF;
//carry = sumHiHi >> 32; /* carry = sumHiHi >> 32; */
sexp_luint_t result; sexp_luint_t result;
result.hi = (resultHiHi << 32) | resultHiLo; result.hi = (resultHiHi << 32) | resultHiLo;
@ -251,7 +251,7 @@ static inline sexp_luint_t luint_add_uint(sexp_luint_t a, sexp_uint_t b) {
uint64_t sumHiHi = aHiHi + carry; uint64_t sumHiHi = aHiHi + carry;
uint64_t resultHiHi = sumHiHi & 0xFFFFFFFF; uint64_t resultHiHi = sumHiHi & 0xFFFFFFFF;
//carry = sumHiHi >> 32; /* carry = sumHiHi >> 32; */
sexp_luint_t result; sexp_luint_t result;
result.hi = (resultHiHi << 32) | resultHiLo; result.hi = (resultHiHi << 32) | resultHiLo;