Try to run the trivial program below. I MPI_File_c2f(MPI_FILE_NULL)
returns "-1" (minus one), however it seems the routine should return
"0" (zero).

#include <mpi.h>
#include <stdio.h>
int main()
{
  MPI_Fint i;
  MPI_File f;
  MPI_Init(0,0);
  i = MPI_File_c2f(MPI_FILE_NULL);
  printf("MPI_File_c2f(MPI_FILE_NULL) -> %d\n", i);
  f = MPI_File_f2c(0);
  printf("MPI_File_f2c(0) == MPI_FILE_NULL -> %s\n", (f ==
MPI_FILE_NULL)?"yes":"no");
  MPI_Finalize();
}


-- 
Lisandro Dalcín
---------------
Centro Internacional de Métodos Computacionales en Ingeniería (CIMEC)
Instituto de Desarrollo Tecnológico para la Industria Química (INTEC)
Consejo Nacional de Investigaciones Científicas y Técnicas (CONICET)
PTLC - Güemes 3450, (3000) Santa Fe, Argentina
Tel/Fax: +54-(0)342-451.1594

Reply via email to