[hypre] Call ClearAllErrors before major operations

arcaneframework · Nov 15, 2023 · 2928b8b · 2928b8b
1 parent 167c596
commit 2928b8b
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 1 deletion.
diff --git a/plugins/hypre/src/hypre_instance.cpp b/plugins/hypre/src/hypre_instance.cpp
@@ -31,8 +31,11 @@ class AlienHypreInstance
  public:
   static void init_if_needed(MPI_Comm comm)
   {
-    if (hypre_initialized)
+    if (hypre_initialized) {
+      // Clear all Hypre error for this session
+      HYPRE_ClearAllErrors();
       return;
+    }
 
     bind_devices(comm);
 
@@ -41,8 +44,10 @@ class AlienHypreInstance
 #endif
 
     hypre_initialized = true;
+    HYPRE_ClearAllErrors();
 
     setup_devices();
+    HYPRE_ClearAllErrors();
   }
 
   static void bind_devices([[maybe_unused]] MPI_Comm comm)

diff --git a/plugins/hypre/src/hypre_matrix.cpp b/plugins/hypre/src/hypre_matrix.cpp
@@ -111,6 +111,8 @@ Matrix::~Matrix()
 void Matrix::init(DirectMatrixOptions::ResetFlag reset_flag)
 {
   HYPRE_Int ierr = 0;
+  // Clear all Hypre error for this session
+  HYPRE_ClearAllErrors();
 
   switch (reset_flag) {
   case DirectMatrixOptions::eNoReset: