1
1

fortran: Fix: array dimension of MPI_ARGVS_NULL.

`MPI_ARGVS_NULL` should be a two-dimensional array.
Without this modification, gfortran throw the following error
if `MPI_ARGVS_NULL` is used for `MPI_COMM_SPAWN_MULTIPLE`.

  Error: There is no specific subroutine for the generic
  'mpi_comm_spawn_multiple' at (1)
Этот коммит содержится в:
KAWASHIMA Takahiro 2015-10-29 20:55:54 +09:00
родитель fe0c995f6b
Коммит 9bf93810d7

Просмотреть файл

@ -41,7 +41,7 @@
! don't need another interface for MPI_COMM_SPAWN.
character MPI_ARGV_NULL(1)
! Ditto for MPI_ARGVS_NULL / MPI_COMM_SPAWN_MULTIPLE.
character MPI_ARGVS_NULL(1)
character MPI_ARGVS_NULL(1, 1)
! MPI_ERRCODES_IGNORE has similar rationale to MPI_ARGV_NULL. The
! F77 functions are all smart enough to check that the errcodes
! parameter is not ERRCODES_IGNORE before assigning values into it