HomeSort by: relevance | last modified time | path
    Searched refs:caf_this_image (Results 1 - 2 of 2) sorted by relevancy

  /src/external/gpl3/gcc/dist/libgfortran/caf/
mpi.c 44 static int caf_this_image; variable
56 fprintf (stderr, "Fortran runtime error on image %d: ", caf_this_image);
89 MPI_Comm_rank (MPI_COMM_WORLD, &caf_this_image);
90 caf_this_image++;
104 free (TOKEN (caf_static_list->token)[caf_this_image-1]);
120 return caf_this_image;
236 free (TOKEN (*token)[caf_this_image-1]);
284 if (count == 0 || (count == 1 && images[0] == caf_this_image))
  /src/external/gpl3/gcc.old/dist/libgfortran/caf/
mpi.c 44 static int caf_this_image; variable
56 fprintf (stderr, "Fortran runtime error on image %d: ", caf_this_image);
89 MPI_Comm_rank (MPI_COMM_WORLD, &caf_this_image);
90 caf_this_image++;
104 free (TOKEN (caf_static_list->token)[caf_this_image-1]);
120 return caf_this_image;
236 free (TOKEN (*token)[caf_this_image-1]);
284 if (count == 0 || (count == 1 && images[0] == caf_this_image))

Completed in 26 milliseconds