search

jeffhammond / vapaa

A standalone implementation of the MPI Fortran 2018 module
MIT License
19 stars 1 forks source link

Fix sentinels #25

Closed jeffhammond closed 1 year ago

jeffhammond commented 1 year ago

F_Status_init isn't required. Detect based on address.

In place and bottom sentinels are not captured.

Make init with this library not necessary. We can init sentinel addresses on demand in an "is init" macro.

jeffhammond commented 1 year ago

MPI_IN_PLACE needs to be an array, too, it seems.

red_scat_blockf08.f90:46:37:

   31 |        call MPI_Reduce_scatter_block(sbuf, rbuf, 1, MPI_INTEGER, &
      |                                     2
......
   46 |        call MPI_Reduce_scatter_block(MPI_IN_PLACE, rbuf, 1, MPI_INTEGER, &
      |                                     1
Error: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar)
jeffhammond commented 1 year ago

I think this is done