There is a bug...

[loba.git] / process.cpp

diff --git a/process.cpp b/process.cpp
index d3d92268c524f87ef67d6db3b4c19d3dfc1073c0..0544b21d9e5b62b08a6a09a25618386913c0d377 100644 (file)
--- a/process.cpp
+++ b/process.cpp
@@ -77,7 +77,7 @@ int process::run()
             if (now < next_iter_after_date){
                 double delay = next_iter_after_date - now;
                 DEBUG1("sleeping for %g s", delay);
-                MSG_process_sleep(next_iter_after_date - now);
+                MSG_process_sleep(delay);
             }
             next_iter_after_date = MSG_get_clock() + opt::min_iter_duration;
         }
@@ -145,6 +145,8 @@ int process::run()
             opt::load_ratio_threshold) {
             VERB0("No more load to balance in system.");
             break;
+        } else {
+            DEBUG1("still %g load to balance, continuing...", total_load_running);
         }
     }
     VERB0("Going to finalize...");
@@ -264,6 +266,7 @@ void process::receive(bool wait)
     message* msg;
     m_host_t from;
 
+    DEBUG1("%sblocking receive", "\0non-" + !wait);
     while (may_receive() && comm.recv(msg, from, wait)) {
         switch (msg->get_type()) {
         case message::INFO: {