void FORTRAN_API mpi_file_read_at_all_begin_(MPI_Fint *fh,MPI_Offset *offset,void *buf, int *count,MPI_Datatype *datatype, int *ierr ) { MPI_File fh_c; fh_c = MPI_File_f2c(*fh); *ierr = MPI_File_read_at_all_begin(fh_c,*offset,buf,*count,*datatype); }
JNIEXPORT void JNICALL Java_mpi_File_readAtAllBegin( JNIEnv *env, jobject jthis, jlong fh, jlong offset, jobject buf, jint count, jlong type) { void *ptr = (*env)->GetDirectBufferAddress(env, buf); int rc = MPI_File_read_at_all_begin((MPI_File)fh, (MPI_Offset)offset, ptr, count, (MPI_Datatype)type); ompi_java_exceptionCheck(env, rc); }
void mpi_file_read_at_all_begin_(MPI_Fint *fh,MPI_Offset *offset,void *buf, int *count,MPI_Fint *datatype, int *ierr ) { MPI_File fh_c; MPI_Datatype datatype_c; fh_c = MPI_File_f2c(*fh); datatype_c = MPI_Type_f2c(*datatype); *ierr = MPI_File_read_at_all_begin(fh_c,*offset,buf,*count,datatype_c); }
void mpi_file_read_at_all_begin_f(MPI_Fint *fh, MPI_Offset *offset, char *buf, MPI_Fint *count, MPI_Fint *datatype, MPI_Fint *ierr) { MPI_File c_fh = MPI_File_f2c(*fh); MPI_Datatype c_type = MPI_Type_f2c(*datatype); *ierr = OMPI_FINT_2_INT(MPI_File_read_at_all_begin(c_fh, (MPI_Offset) *offset, OMPI_F2C_BOTTOM(buf), OMPI_FINT_2_INT(*count), c_type)); }