JDBetteridge/gcc14 (#3617)

* Fix for GCC 14
firedrakeproject · Jun 7, 2024 · cb77d32 · cb77d32
1 parent e9b9e55
commit cb77d32
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/firedrake/preconditioners/fdm.py b/firedrake/preconditioners/fdm.py
@@ -1743,8 +1743,9 @@ def load_setSubMatCSR(comm, triu=False):
                                   InsertMode addv)
             {{
                 PetscInt m, ncols, irow, icol;
-                PetscInt *cols, *indices;
-                PetscScalar *vals;
+                PetscInt *indices;
+                const PetscInt *cols;
+                const PetscScalar *vals;
                 PetscFunctionBeginUser;
                 PetscCall(MatGetSize(B, &m, NULL));
                 PetscCall(MatSeqAIJGetMaxRowNonzeros(B, &ncols));

diff --git a/firedrake/supermeshing.py b/firedrake/supermeshing.py
@@ -210,10 +210,11 @@ def likely(cell_A):
 #define complex_mode %(complex_mode)s
 
     #define PrintInfo(...) do { if (PetscLogPrintInfo) printf(__VA_ARGS__); } while (0)
+    #define FPrintInfo(...) do { if (PetscLogPrintInfo) fprintf(stderr, __VA_ARGS__); } while (0)
     static void print_array(PetscScalar *arr, int d)
     {
         for(int j=0; j<d; j++)
-            PrintInfo(stderr, "%%+.2f ", arr[j]);
+            FPrintInfo("%%+.2f ", arr[j]);
     }
     static void print_coordinates(PetscScalar *simplex, int d)
     {