Fixed memory leak due to missed deallocate of temporary matrix

19 years ago · 2d592b9058
parent 32c47ae9d9
commit 2d592b9058
1 changed files with 2 additions and 0 deletions
--- a/src/tools/psb_dspasb.f90
+++ b/src/tools/psb_dspasb.f90
@ -211,6 +211,8 @@ subroutine psb_dspasb(a,desc_a, info, afmt, up, dup)
        close(iout)
     endif

+     call psb_spfree(atemp,info)
+

  else if (spstate == psb_spmat_upd_) then
     !