From a9f8803dcc0b86fad0ff5c9da7f31ca6eb866d1c Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Thu, 24 Nov 2011 17:58:17 +0000 Subject: [PATCH] *** empty log message *** --- mlprec/mld_dmlprec_bld.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mlprec/mld_dmlprec_bld.f90 b/mlprec/mld_dmlprec_bld.f90 index 46af569e..8d5435eb 100644 --- a/mlprec/mld_dmlprec_bld.f90 +++ b/mlprec/mld_dmlprec_bld.f90 @@ -249,7 +249,7 @@ subroutine mld_dmlprec_bld(a,desc_a,p,info,amold,vmold) end do call mld_move_alloc(p%precv(iszv),t_prec%precv(newsz),info) do i=newsz+1, iszv - call mld_precfree(p%precv(i),info) + call p%precv(i)%free(info) end do call mld_move_alloc(t_prec,p,info) ! Ignore errors from transfer