model-checker : add name of program in arguments of function MSG_main_liveness_statel...

[simgrid.git] / src / msg / global.c

diff --git a/src/msg/global.c b/src/msg/global.c
index 55d4b0a..1cb8503 100644 (file)
--- a/src/msg/global.c
+++ b/src/msg/global.c
@@ -80,7 +80,7 @@ void MSG_global_init(int *argc, char **argv)
 #endif
 
   XBT_DEBUG("ADD MSG LEVELS");
-  MSG_HOST_LEVEL = xbt_lib_add_level(host_lib,free);
+  MSG_HOST_LEVEL = xbt_lib_add_level(host_lib, (void_f_pvoid_t) __MSG_host_destroy);
 }
 
 /** \defgroup m_channel_management    Understanding channels
@@ -153,6 +153,51 @@ MSG_error_t MSG_main(void)
   return MSG_OK;
 }
 
+MSG_error_t MSG_main_stateful(void)
+{
+  /* Clean IO before the run */
+  fflush(stdout);
+  fflush(stderr);
+
+  if (MC_IS_ENABLED) {
+    MC_modelcheck_stateful();
+  }
+  else {
+    SIMIX_run();
+  }
+  return MSG_OK;
+}
+
+MSG_error_t MSG_main_liveness_stateful(xbt_automaton_t a)
+{
+  /* Clean IO before the run */
+  fflush(stdout);
+  fflush(stderr);
+
+  if (MC_IS_ENABLED) {
+    MC_modelcheck_liveness_stateful(a);
+  }
+  else {
+    SIMIX_run();
+  }
+  return MSG_OK;
+}
+
+MSG_error_t MSG_main_liveness_stateless(xbt_automaton_t a, char *prgm)
+{
+  /* Clean IO before the run */
+  fflush(stdout);
+  fflush(stderr);
+
+  if (MC_IS_ENABLED) {
+    MC_modelcheck_liveness_stateless(a, prgm);
+  }
+  else {
+    SIMIX_run();
+  }
+  return MSG_OK;
+}
+
 /** \ingroup msg_simulation
  * \brief Kill all running process
 
@@ -185,9 +230,6 @@ MSG_error_t MSG_clean(void)
 
   MSG_process_killall(0);
 
-  free(msg_global);
-  msg_global = NULL;
-
   /* initialization of the action module */
   _MSG_action_exit();
 
@@ -197,6 +239,9 @@ MSG_error_t MSG_clean(void)
 
   SIMIX_clean();
 
+  free(msg_global);
+  msg_global = NULL;
+
   return MSG_OK;
 }