on master help sign in
Merge pull request #4089 from melted/gmp_clean

Use the gmp API

commitce39b79375e6a748eb01c85805f115de1bac6abe authorNiklas Larsson <metaniklas@gmail.com> dateSun 1 Oct 2017, 02:53 (9 years ago) parente52318cd777aa2
1 file changed+2−2
rts/idris_gmp.c+2−2
rts/idris_gmp.c+2−2
@@ -501,8 +501,8 @@ uint64_t idris_truncBigB64(const mpz_t bi) {
501501 return mpz_get_ui(bi);
502502 }
503503 int64_t out = mpz_get_ui(bi);
504− if (bi->_mp_size > 1 ) {
505− out |= (uint64_t)bi->_mp_d[1] << 32;
504+ if (mpz_size(bi) > 1) {
505+ out |= mpz_getlimbn(bi, 1) << 32;
506506 }
507507 return out;
508508}