--- src/basemath/mftrace.c.orig	2020-10-19 16:07:40.945917453 -0600
+++ src/basemath/mftrace.c	2020-10-19 16:21:03.543190445 -0600
@@ -3714,7 +3714,7 @@ static GEN
 RgV_shimura(GEN A, long n, long t, long N, long r, GEN CHI)
 {
   GEN R, a0, Pn = mfcharpol(CHI);
-  long m, st, ord = mfcharorder(CHI), vt = varn(Pn), Nt = t == 1? N: ulcm(N,t);
+  long m, st, ord = mfcharorder(CHI), vt = varn(Pn), Nt = t == 1? N: (long)ulcm(N,t);
 
   R = cgetg(n + 2, t_VEC);
   st = odd(r)? -t: t;
--- src/basemath/polarit3.c.orig	2020-10-15 02:36:36.000000000 -0600
+++ src/basemath/polarit3.c	2020-10-19 16:20:19.515201075 -0600
@@ -936,7 +936,7 @@ gen_inccrt_i(const char *str, GEN worker
              forprime_t *S, GEN *pH, GEN *pmod, GEN crt(GEN, GEN, GEN*),
              GEN center(GEN, GEN, GEN))
 {
-  long m = mmin? minss(mmin, n): usqrt(n);
+  long m = mmin? minss(mmin, n): (long)usqrt(n);
   GEN  H, P, mod;
   pari_timer ti;
   if (DEBUGLEVEL > 4)