Added nvdestroy check

LLNL · Jan 21, 2025 · 0f2fda3 · 0f2fda3
1 parent e899796
commit 0f2fda3
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/arkode/arkode.c b/src/arkode/arkode.c
@@ -3397,8 +3397,11 @@ int arkCheckTemporalError(ARKodeMem ark_mem, int* nflagPtr, int* nefPtr,
   ---------------------------------------------------------------*/
 sunbooleantype arkAllocVec(ARKodeMem ark_mem, N_Vector tmpl, N_Vector* v)
 {
-  /* return failure if N_VClone is not implemented */
-  if (!tmpl->ops->nvclone) { return SUNFALSE; }
+  /* return failure if N_VClone or N_VDestroy is not implemented */
+  if ((!tmpl->ops->nvclone) || (!tmpl->ops->nvdestroy))
+  {
+    return SUNFALSE;
+  }
 
   /* allocate the new vector if necessary */
   if (*v == NULL)