Jeroen Demeyer on Thu, 14 Jan 2016 10:19:54 +0100


[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]

Use DEBUGLEVEL for "different moduli..." 

I assume that this DEBUGMEM is a mistake:

if (DEBUGMEM) pari_warn(warner,"different moduli in Rg_is_Fp")

Fixed by attached patch.

commit bd203fc1ab116235f12206a40d12ebd37b44ddc1
Author: Jeroen Demeyer <jdemeyer@cage.ugent.be>
Date:   Thu Jan 14 10:18:24 2016 +0100

    Use DEBUGLEVEL instead of DEBUGMEM

diff --git a/src/basemath/polarit3.c b/src/basemath/polarit3.c
index 7b15df6..50d2f6d 100644
--- a/src/basemath/polarit3.c
+++ b/src/basemath/polarit3.c
@@ -114,7 +114,7 @@ Rg_is_Fp(GEN x, GEN *pp)
     if (!*pp) *pp = mod;
     else if (mod != *pp && !equalii(mod, *pp))
     {
-      if (DEBUGMEM) pari_warn(warner,"different moduli in Rg_is_Fp");
+      if (DEBUGLEVEL) pari_warn(warner,"different moduli in Rg_is_Fp");
       return 0;
     }
     return 1;
@@ -170,7 +170,7 @@ Rg_is_FpXQ(GEN x, GEN *pT, GEN *pp)
     if (!*pT) *pT = mod;
     if ((p != *pp && !equalii(p, *pp)) || (mod != *pT && !gequal(mod, *pT)))
     {
-      if (DEBUGMEM) pari_warn(warner,"different moduli in Rg_is_FpXQ");
+      if (DEBUGLEVEL) pari_warn(warner,"different moduli in Rg_is_FpXQ");
       return 0;
     }
     return 1;
@@ -185,7 +185,7 @@ Rg_is_FpXQ(GEN x, GEN *pT, GEN *pp)
     if (!*pT) *pT = mod;
     else if (mod != *pT && !gequal(mod, *pT))
     {
-      if (DEBUGMEM) pari_warn(warner,"different moduli in Rg_is_FpXQ");
+      if (DEBUGLEVEL) pari_warn(warner,"different moduli in Rg_is_FpXQ");
       return 0;
     }
     return 1;