X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a82dc808b0cbd982bdc787a7b0a6721b01f3c116..dbb6a5398ebdb917f1de3acc0d16cd83cd23de71:/examples/lua/masterslave/slave.lua diff --git a/examples/lua/masterslave/slave.lua b/examples/lua/masterslave/slave.lua index 54e51becbe..f2b8a1274f 100644 --- a/examples/lua/masterslave/slave.lua +++ b/examples/lua/masterslave/slave.lua @@ -1,21 +1,25 @@ function Slave(...) + if #arg ~= 1 then + error("Wrong number of arguments (got " .. #arg .. ", expected 1: slave_id)") + end + local my_mailbox = "slave " .. arg[1] - simgrid.info("Hello from lua, I'm a poor slave with mbox: " .. my_mailbox) + simgrid.info("Hello from lua, I'm a poor slave with mailbox: " .. my_mailbox) while true do - local tk = simgrid.task.recv(my_mailbox) - if (simgrid.task.name(tk) == "finalize") then - simgrid.info("Slave '" .. my_mailbox .. "' got finalize msg") + local task = simgrid.task.recv(my_mailbox) + local task_name = task:get_name() + if (task_name == "finalize") then + simgrid.info("Got finalize message") break end - local task_name = simgrid.task.name(tk) - simgrid.info("Slave '" .. my_mailbox.. "' processing " .. task_name) - simgrid.task.execute(tk) - simgrid.info("Slave '" .. my_mailbox .. "': task " .. task_name .. " done") + simgrid.info("Received task '" .. task_name .. "' on mailbox '" .. my_mailbox .. "'") + task:execute() + simgrid.info("Task '" .. task_name .. "' is done") end - simgrid.info("Slave '" .. my_mailbox .. "': I'm Done . See You !!") + simgrid.info("I'm done. See you!") end -- Slave