Cancelling a non-running task: show a warning only once

diff --git a/src/msg/task.c b/src/msg/task.c
index 6d3065f..2a9a5c0 100644 (file)
--- a/src/msg/task.c
+++ b/src/msg/task.c
@@ -203,7 +203,11 @@ MSG_error_t MSG_task_cancel(m_task_t task)
     SIMIX_req_comm_cancel(task->simdata->comm);
   }
   else {
-    XBT_DEBUG("Task %p will not be cancelled since it is not running", task);
+    static int warned = 0;
+    if (!warned) {
+      XBT_WARN("Cannot cancel a non-running task");
+      warned = 1;
+    }
   }
   return MSG_OK;
 }