From 4f4146b082b2908b4bed8e69818d8b66fa4e8d32 Mon Sep 17 00:00:00 2001
From: Mahrud Sayrafi <mahrud@berkeley.edu>
Date: Mon, 4 Mar 2024 16:20:49 -0800
Subject: [PATCH] added compatibility with Flint 3.1.0

---
 M2/Macaulay2/e/mat-linalg.hpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/M2/Macaulay2/e/mat-linalg.hpp b/M2/Macaulay2/e/mat-linalg.hpp
index 4f232f95901..de4c7e1761a 100644
--- a/M2/Macaulay2/e/mat-linalg.hpp
+++ b/M2/Macaulay2/e/mat-linalg.hpp
@@ -864,7 +864,11 @@ inline size_t rowReducedEchelonForm(const DMatGFFlintBig& A,
                                     DMatGFFlintBig& result_rref)
 {
   DMatGFFlintBig A1(A);
+#if __FLINT_RELEASE >= 30100
+  long rank = fq_nmod_mat_rref(A1.fq_nmod_mat(), A1.fq_nmod_mat(), A.ring().flintContext());
+#else
   long rank = fq_nmod_mat_rref(A1.fq_nmod_mat(), A.ring().flintContext());
+#endif
   result_rref.swap(A1);
   return rank;
 }
@@ -925,7 +929,11 @@ inline size_t rowReducedEchelonForm(const DMatGFFlint& A,
                                     DMatGFFlint& result_rref)
 {
   DMatGFFlint A1(A);
+#if __FLINT_RELEASE >= 30100
+  long rank = fq_zech_mat_rref(A1.fq_zech_mat(), A1.fq_zech_mat(), A.ring().flintContext());
+#else
   long rank = fq_zech_mat_rref(A1.fq_zech_mat(), A.ring().flintContext());
+#endif
   result_rref.swap(A1);
   return rank;
 }