X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bba28202d80db522aef1af8dd81c9b9e3e0d3049..80023e612a9047df33d98791d62c53b16b7f7f35:/src/smpi/internals/smpi_replay.cpp diff --git a/src/smpi/internals/smpi_replay.cpp b/src/smpi/internals/smpi_replay.cpp index 21d9183f0a..94845f41bb 100644 --- a/src/smpi/internals/smpi_replay.cpp +++ b/src/smpi/internals/smpi_replay.cpp @@ -3,17 +3,15 @@ /* 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 "private.hpp" #include "smpi_coll.hpp" #include "smpi_comm.hpp" #include "smpi_datatype.hpp" #include "smpi_group.hpp" -#include "smpi_process.hpp" #include "smpi_request.hpp" #include "xbt/replay.hpp" #include +#include -#include #include #include #include @@ -424,7 +422,7 @@ void WaitAction::kernel(simgrid::xbt::ReplayAction& action) // MPI_REQUEST_NULL by Request::wait! bool is_wait_for_receive = (request->flags() & MPI_REQ_RECV); // TODO: Here we take the rank while we normally take the process id (look for my_proc_id) - TRACE_smpi_comm_in(rank, __func__, new simgrid::instr::NoOpTIData("wait")); + TRACE_smpi_comm_in(rank, __func__, new simgrid::instr::WaitTIData(args.src, args.dst, args.tag)); MPI_Status status; Request::wait(&request, &status); @@ -498,7 +496,7 @@ void WaitAction::kernel(simgrid::xbt::ReplayAction& action) // Different times in traced application and replayed version may lead to this // In this case, ignore the extra calls. if (request != MPI_REQUEST_NULL) { - TRACE_smpi_testing_in(my_proc_id); + TRACE_smpi_comm_in(my_proc_id, __func__, new simgrid::instr::NoOpTIData("test")); MPI_Status status; int flag = Request::test(&request, &status); @@ -511,7 +509,7 @@ void WaitAction::kernel(simgrid::xbt::ReplayAction& action) else req_storage.add(request); - TRACE_smpi_testing_out(my_proc_id); + TRACE_smpi_comm_out(my_proc_id); } }