Fixed idiotic memory leak in dhalov.

2026-10-16 19:02:09 +00:00 · 2007-03-09 16:17:58 +00:00
parent 7cb47779bd
commit a985d0ad05
1 changed files with 1 additions and 0 deletions
@@ -363,6 +363,7 @@ subroutine  psb_dhalov(x,desc_a,info,alpha,work,tran,mode,data)
      end if
    end if
  else
+    aliw=.true.
    allocate(iwork(liwork),stat=info)
    if(info.ne.0) then
      info=4010