Rename message_passing.f90 to avoid name clash

This commit is contained in:
Ole Schütt 2021-12-17 22:53:39 +01:00 committed by Ole Schütt
parent bb3ff937c3
commit 5df9b90dd1
4 changed files with 4148 additions and 4152 deletions

View file

@ -4190,8 +4190,6 @@ CONTAINS
CALL mp_timestop(handle)
END SUBROUTINE mp_win_unlock_all
#:include 'message_passing.f90'
! **************************************************************************************************
!> \brief Tests the MPI library
!> \param comm the relevant, initialized communicator
@ -4610,4 +4608,6 @@ CONTAINS
CALL timestop(handle)
END SUBROUTINE mp_timestop
#:include 'message_passing.fypp'
END MODULE message_passing

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -116,19 +116,18 @@ memory_utilities_unittest.F: Found WRITE statement with hardcoded unit in "check
memory_utilities_unittest.F: Found WRITE statement with hardcoded unit in "check_real_rank2_unallocated"
memory_utilities_unittest.F: Found WRITE statement with hardcoded unit in "check_string_rank1_allocated"
memory_utilities_unittest.F: Found WRITE statement with hardcoded unit in "check_string_rank1_unallocated"
message_passing.f90: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar)
message_passing.f90: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
message_passing.f90: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-2)
message_passing.f90: Type mismatch between actual argument at (1) and actual argument at (2) (COMPLEX(4)/REAL(8)).
message_passing.f90: Type mismatch between actual argument at (1) and actual argument at (2) (COMPLEX(8)/COMPLEX(4)).
message_passing.f90: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)).
message_passing.F: Found CALL m_abort in procedure "mp_abort"
message_passing.F: Found CLOSE statement in procedure "mp_file_close"
message_passing.F: Found OPEN statement in procedure "mp_file_open"
message_passing.F: Found STOP statement in procedure "mp_abort"
message_passing.F: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar)
message_passing.F: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-2)
message_passing.F: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
message_passing.F: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/INTEGER(4)).
message_passing.F: USE statement at (1) has no ONLY qualifier [-Wuse-without-only]
message_passing.fypp: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar)
message_passing.fypp: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1)
message_passing.fypp: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-3)
message_passing.fypp: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-4)
message_passing.fypp: Type mismatch between actual argument at (1) and actual argument at (2) (COMPLEX(8)/COMPLEX(4)).
mltfftsg_tools.F: Found WRITE statement with hardcoded unit in "ctrig"
mode_selective.F: Found READ with unchecked STAT in "bfgs_guess"
pao_param_exp.F: Found lossy conversion real_4_r8 without KIND argument in "zheevd_wrapper"