diff --git a/prec/impl/psb_cprecinit.f90 b/prec/impl/psb_cprecinit.f90
index 7f6da35f..9f0b4d68 100644
--- a/prec/impl/psb_cprecinit.f90
+++ b/prec/impl/psb_cprecinit.f90
@@ -65,7 +65,7 @@ subroutine psb_cprecinit(ictxt,p,ptype,info)
     
   case default
     write(psb_err_unit,*) 'Unknown preconditioner type request "',ptype,'"'
-    info = psb_err_pivot_too_small_
+    info = psb_err_invalid_preca_
     
   end select
   if (info == psb_success_)  call p%prec%precinit(info)
diff --git a/prec/impl/psb_dprecinit.f90 b/prec/impl/psb_dprecinit.f90
index 70f7c05a..f28bd446 100644
--- a/prec/impl/psb_dprecinit.f90
+++ b/prec/impl/psb_dprecinit.f90
@@ -65,7 +65,7 @@ subroutine psb_dprecinit(ictxt,p,ptype,info)
     
   case default
     write(psb_err_unit,*) 'Unknown preconditioner type request "',ptype,'"'
-    info = psb_err_pivot_too_small_
+    info = psb_err_invalid_preca_
     
   end select
   if (info == psb_success_)  call p%prec%precinit(info)
diff --git a/prec/impl/psb_sprecinit.f90 b/prec/impl/psb_sprecinit.f90
index 46ab547a..fa5b83c2 100644
--- a/prec/impl/psb_sprecinit.f90
+++ b/prec/impl/psb_sprecinit.f90
@@ -65,7 +65,7 @@ subroutine psb_sprecinit(ictxt,p,ptype,info)
     
   case default
     write(psb_err_unit,*) 'Unknown preconditioner type request "',ptype,'"'
-    info = psb_err_pivot_too_small_
+    info = psb_err_invalid_preca_
     
   end select
   if (info == psb_success_)  call p%prec%precinit(info)
diff --git a/prec/impl/psb_zprecinit.f90 b/prec/impl/psb_zprecinit.f90
index 200e36dd..d9f5aa01 100644
--- a/prec/impl/psb_zprecinit.f90
+++ b/prec/impl/psb_zprecinit.f90
@@ -65,7 +65,7 @@ subroutine psb_zprecinit(ictxt,p,ptype,info)
     
   case default
     write(psb_err_unit,*) 'Unknown preconditioner type request "',ptype,'"'
-    info = psb_err_pivot_too_small_
+    info = psb_err_invalid_preca_
     
   end select
   if (info == psb_success_)  call p%prec%precinit(info)