diff --git a/krylov/psb_cfcg.F90 b/krylov/psb_cfcg.F90
index d96ab541..e458aefd 100644
--- a/krylov/psb_cfcg.F90
+++ b/krylov/psb_cfcg.F90
@@ -223,7 +223,7 @@ subroutine psb_cfcg_vect(a,prec,b,x,eps,desc_a,info,&
       if (psb_errstatus_fatal()) then 
         nc2l = desc_a%get_local_cols()
         info=psb_err_alloc_request_
-        call psb_errpush(info,name,i_err=(/2*nc2l,izero,izero,izero,izero/),&
+        call psb_errpush(info,name,i_err=(/2*nc2l/),&
              & a_err='complex(psb_spk_)')
         goto 9999      
       end if
diff --git a/krylov/psb_dcg.F90 b/krylov/psb_dcg.F90
index efdb1334..9b55fea8 100644
--- a/krylov/psb_dcg.F90
+++ b/krylov/psb_dcg.F90
@@ -299,7 +299,7 @@ subroutine psb_dcg_vect(a,prec,b,x,eps,desc_a,info,&
            & ieg,nspl,eig,ibl,ispl,ewrk,iwrk,info)
       if (info < 0) then 
         call psb_errpush(psb_err_from_subroutine_ai_,name,&
-             & a_err='dstebz',i_err=(/info,izero,izero,izero,izero/))
+             & a_err='dstebz',i_err=(/info/))
         info=psb_err_from_subroutine_ai_
         goto 9999
       end if
diff --git a/krylov/psb_dfcg.F90 b/krylov/psb_dfcg.F90
index ba5d25a8..c5ea1e41 100644
--- a/krylov/psb_dfcg.F90
+++ b/krylov/psb_dfcg.F90
@@ -223,7 +223,7 @@ subroutine psb_dfcg_vect(a,prec,b,x,eps,desc_a,info,&
       if (psb_errstatus_fatal()) then 
         nc2l = desc_a%get_local_cols()
         info=psb_err_alloc_request_
-        call psb_errpush(info,name,i_err=(/2*nc2l,izero,izero,izero,izero/),&
+        call psb_errpush(info,name,i_err=(/2*nc2l/),&
              & a_err='real(psb_dpk_)')
         goto 9999      
       end if
diff --git a/krylov/psb_scg.F90 b/krylov/psb_scg.F90
index 0e6c88a7..9d83b0d8 100644
--- a/krylov/psb_scg.F90
+++ b/krylov/psb_scg.F90
@@ -299,7 +299,7 @@ subroutine psb_scg_vect(a,prec,b,x,eps,desc_a,info,&
            & ieg,nspl,eig,ibl,ispl,ewrk,iwrk,info)
       if (info < 0) then 
         call psb_errpush(psb_err_from_subroutine_ai_,name,&
-             & a_err='sstebz',i_err=(/info,izero,izero,izero,izero/))
+             & a_err='sstebz',i_err=(/info/))
         info=psb_err_from_subroutine_ai_
         goto 9999
       end if
diff --git a/krylov/psb_sfcg.F90 b/krylov/psb_sfcg.F90
index 3e8c3984..db2ab302 100644
--- a/krylov/psb_sfcg.F90
+++ b/krylov/psb_sfcg.F90
@@ -223,7 +223,7 @@ subroutine psb_sfcg_vect(a,prec,b,x,eps,desc_a,info,&
       if (psb_errstatus_fatal()) then 
         nc2l = desc_a%get_local_cols()
         info=psb_err_alloc_request_
-        call psb_errpush(info,name,i_err=(/2*nc2l,izero,izero,izero,izero/),&
+        call psb_errpush(info,name,i_err=(/2*nc2l/),&
              & a_err='real(psb_spk_)')
         goto 9999      
       end if
diff --git a/krylov/psb_zfcg.F90 b/krylov/psb_zfcg.F90
index c6aa6807..9291d666 100644
--- a/krylov/psb_zfcg.F90
+++ b/krylov/psb_zfcg.F90
@@ -223,7 +223,7 @@ subroutine psb_zfcg_vect(a,prec,b,x,eps,desc_a,info,&
       if (psb_errstatus_fatal()) then 
         nc2l = desc_a%get_local_cols()
         info=psb_err_alloc_request_
-        call psb_errpush(info,name,i_err=(/2*nc2l,izero,izero,izero,izero/),&
+        call psb_errpush(info,name,i_err=(/2*nc2l/),&
              & a_err='complex(psb_dpk_)')
         goto 9999      
       end if