Fixed bug

1 year ago · e1e7aa58d2
parent 38203f4d10
commit e1e7aa58d2
1 changed files with 1 additions and 0 deletions
--- a/base/psblas/psb_dmlt_vect.f90
+++ b/base/psblas/psb_dmlt_vect.f90
@ -220,6 +220,7 @@ subroutine psb_dmlt_mltvec_va(x,a,v,desc,info)
  info=psb_success_
  call psb_erractionsave(err_act)

+  ctxt = desc%get_ctxt()
  call psb_info(ctxt, me, np)
  if (np == -ione) then
    info = psb_err_context_error_