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