*** empty log message ***

17 years ago · 113d536e1d
parent 6b13585ad6
commit 113d536e1d
1 changed files with 1 additions and 0 deletions
--- a/base/modules/psb_tools_mod.f90
+++ b/base/modules/psb_tools_mod.f90
@ -701,6 +701,7 @@ contains
      call psb_cd_inloc((/(i,i=nlp+1,nlp+nl)/),ictxt,desc_a,info)

    endif
+    if (info /= 0) goto 999
    call psb_erractionrestore(err_act)
    return