--- src/basemath/bibli1.c +++ src/basemath/bibli1.c @@ -1880,7 +1880,7 @@ END: GEN fincke_pohst(GEN a, GEN B0, long stockmax, long PREC, FP_chk_fun *CHECK) { - pari_sp av = avma; + VOLATILE pari_sp av = avma; VOLATILE long i,j,l; VOLATILE GEN r,rinv,rinvtrans,u,v,res,z,vnorm,rperm,perm,uperm, bound = B0; --- src/gp/gp.c +++ src/gp/gp.c @@ -420,7 +420,8 @@ break_loop(int numerr) { filtre_t F; Buffer *b; - int sigint = numerr<0, go_on = sigint; + int sigint = numerr<0; + VOLATILE int go_on = sigint; struct gp_context rec1, rec2; const char *prompt, *msg; long nenv, oldframe_level = frame_level; --- src/language/gplib.c +++ src/language/gplib.c @@ -936,7 +936,7 @@ parse_key_val(char *src, char **ps, char void gp_initrc(pari_stack *p_A) { - FILE *file = gprc_get(); + FILE * VOLATILE file = gprc_get(); Buffer *b; filtre_t F; VOLATILE long c = 0; --- src/modules/stark.c +++ src/modules/stark.c @@ -2781,9 +2781,10 @@ quadray_init(GEN *pD, GEN f, GEN *pbnf, /* compute the polynomial over Q of the Hilbert class field of Q(sqrt(D)) where D is a positive fundamental discriminant */ static GEN -quadhilbertreal(GEN D, long prec) +quadhilbertreal(GEN D, long baseprec) { pari_sp av = avma; + VOLATILE long prec = baseprec; long newprec; GEN bnf; VOLATILE GEN bnr, dtQ, data, nf, cyc, M;