Implement MSG_get_msgload

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@1286 48e7efb5-ca39-0410-a469-dd3cf9ba447f

diff --git a/ChangeLog b/ChangeLog
index 4737109..d0c49dc 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+SimGrid (2.95) unstable; urgency=low
+
+  MSG
+  * Implement MSG_get_msgload [MQ]
+
+ -- 
+
 SimGrid (2.94) unstable; urgency=low
 
   The first release candidate for SimGrid 3 !

diff --git a/src/msg/gos.c b/src/msg/gos.c
index 9dcfb54..8ae5ab4 100644 (file)
--- a/src/msg/gos.c
+++ b/src/msg/gos.c
@@ -377,9 +377,9 @@ MSG_error_t MSG_process_sleep(double nb_sec)
 int MSG_get_msgload(void) 
 {
   CHECK_HOST();
-  xbt_assert0(0,"Not implemented yet!");
   
-  return 1;
+  m_process_t process = MSG_process_self();
+  return xbt_fifo_size(process->simdata->host->simdata->process_list);
 }
 
 /** \ingroup msg_gos_functions