Fix missing deallocate on tmpn.

19 years ago · 432e910566
parent 41260094dc
commit 432e910566
1 changed files with 39 additions and 38 deletions
--- a/src/serial/psb_dneigh.f90
+++ b/src/serial/psb_dneigh.f90
@ -52,6 +52,7 @@ subroutine psb_dneigh(a,idx,neigh,n,info,lev)
           n=n+nn
        end if
     end do
+     deallocate(tmpn)
  end if
  
  call psb_erractionrestore(err_act)