XBT_PUBLIC void smpi_init_options();
XBT_PUBLIC void smpi_execute_flops(double flops);
+XBT_PUBLIC void smpi_execute_flops_benched(double flops);
XBT_PUBLIC void smpi_execute(double duration);
XBT_PUBLIC void smpi_execute_benched(double duration);
smpi_execute_flops(*flops);
}
+void smpi_execute_flops_benched_(double* flops){
+ smpi_execute_flops_benched(*flops);
+}
+
void smpi_execute_(double* duration){
smpi_execute(*duration);
}
void mpi_file_write_(int* fh, void* buf, int* count, int* datatype, MPI_Status* status, int* ierr);
void smpi_init_fortran_types();
void smpi_execute_flops_(double* flops);
+void smpi_execute_flops_benched_(double* flops);
void smpi_execute_(double* duration);
void smpi_execute_benched_(double* duration);
} // extern "C"
smpi_bench_begin();
}
+void smpi_execute_flops_benched(double flops) {
+ smpi_bench_end();
+ smpi_execute_flops(flops);
+ smpi_bench_begin();
+}
+
void smpi_bench_begin()
{
if (smpi_cfg_privatization() == SmpiPrivStrategies::MMAP) {