compilation failure with gfortran 10

[pjknowles]

In GitLab by @ajmay81 on Jun 16, 2020, 10:18

PluginGuestF.F90 fails to build with gfortran 10, one can either fix the code or build with new compiler option -fallow-argument-mismatch (as we do inside Molpro because of the huge number of historical mismatches):

_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:122:34:

  115 |   IF (m_rank.EQ.0) CALL MPI_Send(length,1,MPI_INT,0,0,m_intercomm,ierr)
      |                                 2 
......
  122 |    IF (m_rank.EQ.0) CALL MPI_Send(TRIM(value),length,MPI_CHAR,0,1,m_intercomm,ierr)
      |                                  1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(66995424)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:100:33:

  100 |   IF (m_rank.EQ.0) CALL MPI_Recv(PluginGuestF_receive,length,MPI_INT,0,1,m_intercomm,status,ierr)
      |                                 1
......
  117 |   IF (m_rank.EQ.0) CALL MPI_Recv(answer,1,MPI_INT,0,0,m_intercomm,status,ierr)
      |                                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(0)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:101:17:

  101 |   CALL MPI_Bcast(PluginGuestF_receive,length,MPI_CHAR,0,m_world,ierr)
      |                 1
......
  114 |   CALL MPI_Bcast(length,1,MPI_INT,0,m_world,ierr)
      |                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(0)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:41:17:

   41 |    CALL MPI_Recv(id,length,MPI_CHAR,0,1,m_intercomm,status,ierr)
      |                 1
......
  117 |   IF (m_rank.EQ.0) CALL MPI_Recv(answer,1,MPI_INT,0,0,m_intercomm,status,ierr)
      |                                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(1024)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:77:17:

   77 |   CALL MPI_Bcast(m_host,length,MPI_CHAR,0,m_world,ierr)
      |                 1
......
  114 |   CALL MPI_Bcast(length,1,MPI_INT,0,m_world,ierr)
      |                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(0)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:81:17:

   81 |   CALL MPI_Bcast(m_hostVersion,length,MPI_CHAR,0,m_world,ierr)
      |                 1
......
  114 |   CALL MPI_Bcast(length,1,MPI_INT,0,m_world,ierr)
      |                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(0)/INTEGER(8)).
_deps/_private_dep_molpro_plugin-src/lib/PluginGuestF.F90:82:17:

   82 |   CALL MPI_Bcast(m_active,1,MPI_LOGICAL,0,m_world,ierr)
      |                 1
......
  114 |   CALL MPI_Bcast(length,1,MPI_INT,0,m_world,ierr)
      |                 2
Error: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(8)/INTEGER(8)).

[pjknowles]

In GitLab by @ajmay81 on Aug 5, 2020, 17:18

Looks like this was fixed by aee302a