diff --git a/test/kernel/pdgenspmv.f90 b/test/kernel/pdgenspmv.f90 index 9097e510..db43b65e 100644 --- a/test/kernel/pdgenspmv.f90 +++ b/test/kernel/pdgenspmv.f90 @@ -109,7 +109,7 @@ program pdgen endif if(psb_get_errstatus() /= 0) goto 9999 name='pde90' - call psb_set_errverbosity(2) + call psb_set_errverbosity(itwo) ! ! Hello world ! @@ -146,7 +146,7 @@ program pdgen !!$ call psb_cdcpy(desc_a,desc_b,info) !!$ call psb_set_debug_level(9999) - call psb_cdbldext(a,desc_a,2,desc_b,info,extype=psb_ovt_asov_) + call psb_cdbldext(a,desc_a,itwo,desc_b,info,extype=psb_ovt_asov_) if (info /= 0) then write(0,*) 'Error from bldext' call psb_abort(ictxt)