fix froll memory leaks #7273

Author: jangorecki

src/froll.c

@@ -681,6 +681,7 @@ void frollmaxExact(double *x, uint64_t nx, ans_t *ans, int k, double fill, bool
         ans->dbl_v[i] = w;
       }
     }
+    free(isnan);
   }
 }
 
@@ -841,7 +842,6 @@ void frollminExact(double *x, uint64_t nx, ans_t *ans, int k, double fill, bool
     bool *isnan = malloc(nx*sizeof(bool));                          // isnan lookup - we use it to reduce ISNAN calls in nested loop
     if (!isnan) {                                                   // # nocov start
       ansSetMsg(ans, 3, "%s: Unable to allocate memory for isnan", __func__); // raise error
-      free(isnan);
       return;
     }                                                               // # nocov end
     bool truehasnf = hasnf>0;
@@ -885,6 +885,7 @@ void frollminExact(double *x, uint64_t nx, ans_t *ans, int k, double fill, bool
         ans->dbl_v[i] = w;
       }
     }
+    free(isnan);
   }
 }
 

src/frolladaptive.c

@@ -554,6 +554,7 @@ void frolladaptivemaxExact(double *x, uint64_t nx, ans_t *ans, int *k, double fi
         }
       }
     }
+    free(isnan);
   }
 }
 
@@ -581,7 +582,6 @@ void frolladaptiveminExact(double *x, uint64_t nx, ans_t *ans, int *k, double fi
     bool *isnan = malloc(nx*sizeof(bool)); // isnan lookup - we use it to reduce ISNAN calls in nested loop
     if (!isnan) {                                                    // # nocov start
       ansSetMsg(ans, 3, "%s: Unable to allocate memory for isnan", __func__); // raise error
-      free(isnan);
       return;
     }                                                               // # nocov end
     bool truehasnf = hasnf>0;
@@ -633,6 +633,7 @@ void frolladaptiveminExact(double *x, uint64_t nx, ans_t *ans, int *k, double fi
         }
       }
     }
+    free(isnan);
   }
 }