diff --git a/base/serial/impl/psb_c_base_mat_impl.f90 b/base/serial/impl/psb_c_base_mat_impl.f90
index 4e8ce78f..aecc3cbf 100644
--- a/base/serial/impl/psb_c_base_mat_impl.f90
+++ b/base/serial/impl/psb_c_base_mat_impl.f90
@@ -810,7 +810,6 @@ subroutine psb_c_base_cssm(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
@@ -941,7 +940,6 @@ subroutine psb_c_base_cssv(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_d_base_mat_impl.f90 b/base/serial/impl/psb_d_base_mat_impl.f90
index a6ad8394..4ffa18e7 100644
--- a/base/serial/impl/psb_d_base_mat_impl.f90
+++ b/base/serial/impl/psb_d_base_mat_impl.f90
@@ -810,7 +810,6 @@ subroutine psb_d_base_cssm(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
@@ -941,7 +940,6 @@ subroutine psb_d_base_cssv(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_s_base_mat_impl.f90 b/base/serial/impl/psb_s_base_mat_impl.f90
index e6ad064e..7f8d12f8 100644
--- a/base/serial/impl/psb_s_base_mat_impl.f90
+++ b/base/serial/impl/psb_s_base_mat_impl.f90
@@ -810,7 +810,6 @@ subroutine psb_s_base_cssm(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
@@ -941,7 +940,6 @@ subroutine psb_s_base_cssv(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_z_base_mat_impl.f90 b/base/serial/impl/psb_z_base_mat_impl.f90
index 9fd6b20b..d48e849a 100644
--- a/base/serial/impl/psb_z_base_mat_impl.f90
+++ b/base/serial/impl/psb_z_base_mat_impl.f90
@@ -811,7 +811,6 @@ subroutine psb_z_base_cssm(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return
 
@@ -942,7 +941,6 @@ subroutine psb_z_base_cssv(alpha,a,x,beta,y,info,trans,scale,d)
   end if
 
 
-  return
   call psb_erractionrestore(err_act)
   return