/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
-#include "colls_private.h"
#include <float.h>
+#include <exception>
+
+#include "colls_private.h"
+
//attempt to do a quick autotuning version of the collective,
#define TRACE_AUTO_COLL(cat) if (TRACE_is_enabled()){\
min_coll=i;\
time_min=time2-time1;\
}\
- if(smpi_comm_rank(comm)==0){\
+ if(comm->rank()==0){\
if(buf_in<max_min){\
max_min=buf_in;\
global_coll=i;\
}\
}\
}\
- if(smpi_comm_rank(comm)==0){\
+ if(comm->rank()==0){\
XBT_WARN("For rank 0, the quickest was %s : %f , but global was %s : %f at max",mpi_coll_##cat##_description[min_coll].name, time_min,mpi_coll_##cat##_description[global_coll].name, max_min);\
}else\
- XBT_WARN("The quickest %s was %s on rank %d and took %f",#cat,mpi_coll_##cat##_description[min_coll].name, smpi_comm_rank(comm), time_min);\
+ XBT_WARN("The quickest %s was %s on rank %d and took %f",#cat,mpi_coll_##cat##_description[min_coll].name, comm->rank(), time_min);\
return (min_coll!=-1)?MPI_SUCCESS:MPI_ERR_INTERN;\
}\