On Thu, Oct 17, 2024 at 08:06:02PM +0800, Qian Yun wrote:
> Solved.
> 
> diff --git a/src/lib/gmp_wrap.c b/src/lib/gmp_wrap.c
> index a1065104..45e3fa7b 100644
> --- a/src/lib/gmp_wrap.c
> +++ b/src/lib/gmp_wrap.c
> @@ -165,7 +165,7 @@ gmp_wrap_gcd(mp_limb_t * rp, mp_limb_t *s1p,
>          rp[res] = rc;
>          res++;
>      }
> -    if (rp[res - 1] & (1ul << (BIT_CNT - 1))) {
> +    if (rp[res - 1] & (1ull << (BIT_CNT - 1))) {
>          rp[res] = 0;
>          res++;
>      }
> 
> On Windows, 1ul (unsigned long) is 4 bytes instead of 8.
> So changing to 1ull fixes this.

OK, please commit.

-- 
                              Waldek Hebisch

-- 
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To view this discussion on the web visit 
https://groups.google.com/d/msgid/fricas-devel/ZxGQX-uDqPskr_7U%40fricas.org.

Reply via email to