|
 |
47eeb38 |
--- src/basemath/bibli1.c.orig 2020-10-15 02:36:36.000000000 -0600
|
|
|
47eeb38 |
+++ src/basemath/bibli1.c 2020-10-19 15:10:33.130950212 -0600
|
|
|
47eeb38 |
@@ -1902,7 +1902,7 @@ END:
|
|
 |
d87f6c9 |
GEN
|
|
|
80bdf67 |
fincke_pohst(GEN a, GEN B0, long stockmax, long PREC, FP_chk_fun *CHECK)
|
|
|
d87f6c9 |
{
|
|
|
d87f6c9 |
- pari_sp av = avma;
|
|
|
d87f6c9 |
+ VOLATILE pari_sp av = avma;
|
|
|
d87f6c9 |
VOLATILE long i,j,l;
|
|
|
d87f6c9 |
VOLATILE GEN r,rinv,rinvtrans,u,v,res,z,vnorm,rperm,perm,uperm, bound = B0;
|
|
|
d87f6c9 |
|
|
|
47eeb38 |
--- src/gp/gp.c.orig 2020-10-15 02:36:36.000000000 -0600
|
|
|
47eeb38 |
+++ src/gp/gp.c 2020-10-19 15:10:33.131950211 -0600
|
|
|
47eeb38 |
@@ -433,7 +433,8 @@ break_loop(int numerr)
|
|
|
4284d36 |
{
|
|
|
4284d36 |
filtre_t F;
|
|
|
4284d36 |
Buffer *b;
|
|
|
4284d36 |
- int sigint = numerr<0, go_on = sigint;
|
|
|
4284d36 |
+ int sigint = numerr<0;
|
|
|
4284d36 |
+ VOLATILE int go_on = sigint;
|
|
|
06e7417 |
struct gp_context rec1, rec2;
|
|
|
4284d36 |
const char *prompt, *msg;
|
|
|
06e7417 |
long nenv, oldframe_level = frame_level;
|
|
|
47eeb38 |
--- src/language/gplib.c.orig 2020-10-15 02:36:36.000000000 -0600
|
|
|
47eeb38 |
+++ src/language/gplib.c 2020-10-19 15:10:33.132950211 -0600
|
|
|
47eeb38 |
@@ -938,7 +938,7 @@ parse_key_val(char *src, char **ps, char
|
|
|
06e7417 |
void
|
|
|
06e7417 |
gp_initrc(pari_stack *p_A)
|
|
|
06e7417 |
{
|
|
|
06e7417 |
- FILE *file = gprc_get();
|
|
|
06e7417 |
+ FILE * VOLATILE file = gprc_get();
|
|
|
06e7417 |
Buffer *b;
|
|
|
06e7417 |
filtre_t F;
|
|
|
06e7417 |
VOLATILE long c = 0;
|
|
|
47eeb38 |
--- src/modules/stark.c.orig 2020-10-15 02:36:36.000000000 -0600
|
|
|
47eeb38 |
+++ src/modules/stark.c 2020-10-19 16:19:30.113213038 -0600
|
|
|
47eeb38 |
@@ -2548,10 +2548,11 @@ quadray_init(GEN *pD, GEN f, GEN *pbnf,
|
|
|
d87f6c9 |
/* compute the polynomial over Q of the Hilbert class field of
|
|
|
d87f6c9 |
Q(sqrt(D)) where D is a positive fundamental discriminant */
|
|
|
d87f6c9 |
static GEN
|
|
|
d87f6c9 |
-quadhilbertreal(GEN D, long prec)
|
|
|
87fecc4 |
+quadhilbertreal(GEN D, long baseprec)
|
|
|
d87f6c9 |
{
|
|
|
d87f6c9 |
pari_sp av = avma;
|
|
|
47eeb38 |
GEN bnf, pol, bnr, dtQ, data, M;
|
|
|
87fecc4 |
+ VOLATILE long prec = baseprec;
|
|
|
d87f6c9 |
long newprec;
|
|
|
47eeb38 |
pari_timer T;
|
|
|
47eeb38 |
|