Simple caching for psb_info. Make barrier in errcomm optional, default false.

2026-10-20 04:42:08 +00:00 · 2017-07-27 15:03:30 +01:00
parent 9c989c24e9
commit a0a0e96a96
3 changed files with 43 additions and 8 deletions
@@ -5,7 +5,7 @@ subroutine psb_errcomm(ictxt, err)
  integer(psb_mpik_), intent(in)   :: ictxt
  integer(psb_ipk_), intent(inout):: err
  
-  call psb_amx(ictxt, err)
+  if (psb_get_global_checks()) call psb_amx(ictxt, err)

 end subroutine psb_errcomm