From a1de1752aace16055541525b6f0a760f77c7164e Mon Sep 17 00:00:00 2001
From: Karim Belabas <Karim.Belabas@math.u-bordeaux.fr>
Date: Mon, 7 Nov 2022 23:31:26 +0100
Subject: [PATCH 1/2] typo in get_maxord

---
 src/basemath/base2.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/basemath/base2.c b/src/basemath/base2.c
index 8b546e9ce3..f9ea17b220 100644
--- a/src/basemath/base2.c
+++ b/src/basemath/base2.c
@@ -392,7 +392,7 @@ get_maxord(nfmaxord_t *S, GEN T0, long flag)
           if (DEBUGLEVEL)
             pari_warn(warner,"large composite in nfmaxord:loop(), %Ps", p);
           if (expi(p) < 100)
-            u = Z_factor(p); /* factor(n < 2^100) should take ~20ms */
+            u = gel(Z_factor(p), 1); /* p < 2^100 should take ~20ms */
           else if (S->certify)
             u = Z_fac(p);
           else
-- 
2.30.2

