From 9d45ffb77173d509396e2b92967c868d952853fd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lorenz=20H=C3=BCdepohl?= Date: Thu, 20 Jul 2017 18:00:50 +0200 Subject: [PATCH] Small error: asymmetry in allocate()/deallocate() #ifdefs --- test/Fortran/test.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/Fortran/test.F90 b/test/Fortran/test.F90 index 89cb9bf8..c8d464dd 100644 --- a/test/Fortran/test.F90 +++ b/test/Fortran/test.F90 @@ -401,7 +401,7 @@ program test deallocate(z) deallocate(ev) -#ifdef __EIGENVALUES +#if defined(__EIGENVALUES) || defined(__SOLVE_TRIDIAGONAL) deallocate(d, ds) deallocate(sd, sds) deallocate(ev_analytic) -- GitLab