psblas3:

psi_penv_mod.F90 Again uninitialized info...
2026-10-19 12:22:10 +00:00 · 2012-02-29 10:08:48 +00:00
parent 4f58c7f370
commit 1bfbee84e3
1 changed files with 2 additions and 1 deletions
@@ -109,7 +109,8 @@ contains
    include 'mpif.h'
 #endif
    integer(psb_mpik_) :: info
-
+    
+    info = 0
 #if defined(LONG_INTEGERS)
    psb_mpi_ipk_integer = mpi_integer8
 #else