diff --git a/base/psblas/psb_dmlt_vect.f90 b/base/psblas/psb_dmlt_vect.f90
index 59936df5..4006a7d8 100644
--- 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_