simcall_get_comm() defined and implemented

diff --git a/src/mc/mc_api.cpp b/src/mc/mc_api.cpp
index 51f3d9f5caa80706a48650819e37105d64676a08..091ae12287ef14e507ec7f131d560a5cf05b5956 100644 (file)
--- a/src/mc/mc_api.cpp
+++ b/src/mc/mc_api.cpp
@@ -61,6 +61,18 @@ smx_mailbox_t get_mbox(smx_simcall_t const r)
   }
 }
 
+inline simgrid::kernel::activity::CommImpl* get_comm(smx_simcall_t const r)
+{
+  switch (r->call_) {
+    case Simcall::COMM_WAIT:
+      return simcall_comm_wait__getraw__comm(r);
+    case Simcall::COMM_TEST:
+      return simcall_comm_test__getraw__comm(r);
+    default:
+      return nullptr;
+  }
+}
+
 /* Search an enabled transition for the given process.
  *
  * This can be seen as an iterator returning the next transition of the process.
@@ -425,6 +437,11 @@ smx_mailbox_t mc_api::simcall_get_mbox(smx_simcall_t const req) const
   return get_mbox(req);
 }
 
+simgrid::kernel::activity::CommImpl* mc_api::simcall_get_comm(smx_simcall_t const req) const
+{
+  return get_comm(req);
+}
+
 bool mc_api::mc_is_null() const
 {
   auto is_null = (mc_model_checker == nullptr) ? true : false;

diff --git a/src/mc/mc_api.hpp b/src/mc/mc_api.hpp
index a6841591a5a034fe450780ff71da3a08bca6acb3..d2e218fc5cc464e8d259cebcde855f1df0ec377b 100644 (file)
--- a/src/mc/mc_api.hpp
+++ b/src/mc/mc_api.hpp
@@ -100,6 +100,7 @@ public:
   smx_actor_t simcall_get_issuer(s_smx_simcall const* req) const;
   long simcall_get_actor_id(s_smx_simcall const* req) const;
   smx_mailbox_t simcall_get_mbox(smx_simcall_t const req) const;
+  simgrid::kernel::activity::CommImpl* simcall_get_comm(smx_simcall_t const req) const;
 
 #if HAVE_SMPI
   int get_smpi_request_tag(smx_simcall_t const& simcall, simgrid::simix::Simcall type) const;