fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-17 03:12:15 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fixes for IPK8

Browse Source
This commit is contained in:
sfilippone
2025-06-01 20:56:11 +02:00
parent 4d0226b7d6
commit 07fa2323eb
162 changed files with 1873 additions and 1338 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/psb_error_impl.F90
+1 -1
View File
@@ -15,7 +15,7 @@ subroutine psb_errcomm_m(ctxt, err)
use psb_error_mod, psb_protect_name => psb_errcomm
use psb_penv_mod
type(psb_ctxt_type), intent(in) :: ctxt
integer(psb_ipk_), intent(inout) :: err
integer(psb_mpk_), intent(inout) :: err
if (psb_get_global_checks()) call psb_amx(ctxt, err)