summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
cf720a7)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@7338
48e7efb5-ca39-0410-a469-
dd3cf9ba447f
comm_size = arg[3];
slave_count = arg[4]
comm_size = arg[3];
slave_count = arg[4]
+if (#arg ~= 4) then
+ error("Argc should be 4");
+end
simgrid.info("Argc="..(#arg).." (should be 4)")
-- Dispatch the tasks
simgrid.info("Argc="..(#arg).." (should be 4)")
-- Dispatch the tasks
-- Slave Function ---------------------------------------------------------
function Slave(...)
-- Slave Function ---------------------------------------------------------
function Slave(...)
-my_mailbox="slave "..arg[1]
+local my_mailbox="slave "..arg[1]
simgrid.info("Hello from lua, I'm a poor slave with mbox: "..my_mailbox)
while true do
-- tk = simgrid.Task.new("",0,0); --??
-- simgrid.Task.recv2(tk,my_mailbox);
simgrid.info("Hello from lua, I'm a poor slave with mbox: "..my_mailbox)
while true do
-- tk = simgrid.Task.new("",0,0); --??
-- simgrid.Task.recv2(tk,my_mailbox);
- tk = simgrid.Task.recv(my_mailbox);
+ local tk = simgrid.Task.recv(my_mailbox);
- tk_name = simgrid.Task.name(tk)
+ local tk_name = simgrid.Task.name(tk)
if (tk_name == "finalize") then
simgrid.info("Slave '" ..my_mailbox.."' got finalize msg");
if (tk_name == "finalize") then
simgrid.info("Slave '" ..my_mailbox.."' got finalize msg");