diff --git a/src/testing/ATL_f77getri.c b/src/testing/ATL_f77getri.c
index 2cc576c..7ff8eba 100644
--- a/src/testing/ATL_f77getri.c
+++ b/src/testing/ATL_f77getri.c
@@ -97,7 +97,6 @@ int f77getri(const enum ATLAS_ORDER Order, const int N, TYPE *A, const int lda,
    #ifdef ATL_FunkyInts
       *lwork = F77lwork;
       for (i=0; i < MN; i++) ipiv[i] = F77ipiv[i] + 1;
-      free(F77ipiv);
    #else
       for (i=0; i < MN; i++) ipiv[i]++;
    #endif