X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d947ff7466b473eeec602007934f8336a9b17f3c..767d7bdbc801f6ec69833f72c66ae1975dc8c754:/examples/lua/console/slave.lua diff --git a/examples/lua/console/slave.lua b/examples/lua/console/slave.lua index 2073530c4c..89f541982e 100644 --- a/examples/lua/console/slave.lua +++ b/examples/lua/console/slave.lua @@ -1,13 +1,17 @@ +-- Copyright (c) 2011, 2013-2014. The SimGrid Team. +-- All rights reserved. +-- This program is free software; you can redistribute it and/or modify it +-- under the terms of the license (GNU LGPL) which comes with this package. -- Slave Function --------------------------------------------------------- function Slave(...) - if #arg ~= 1 then + if select("#", ...) ~= 1 then error("Wrong number of arguments (got " .. #arg .. ", expected 1: slave_id)") end - local my_mailbox = "slave " .. arg[1] + local my_mailbox = "slave " .. select(1, ...) simgrid.info("Hello from lua, I'm a poor slave with mbox: " .. my_mailbox) while true do @@ -15,17 +19,17 @@ function Slave(...) local task = simgrid.task.recv(my_mailbox); --print(task) local task_name = task:get_name() - if (task_name == "finalize") then + if (task:get_name() == "finalize") then simgrid.info("Slave '" .. my_mailbox .. "' got finalize msg"); break end - --local tk_name = simgrid.task.get_name(tk) - simgrid.info("Slave '" .. my_mailbox .. "' processing " .. task_name) + --local tk_name = simgrid.task.get_name(tk) + simgrid.info("Slave '" .. my_mailbox .. "' processing " .. task:get_name()) simgrid.task.execute(task) - simgrid.info("Slave '" .. my_mailbox .. "': task " .. task_name .. " done") + simgrid.info("Slave '" .. my_mailbox .. "': task " .. task:get_name() .. " done") end -- while simgrid.info("Slave '" .. my_mailbox .. "': I'm Done . See You !!"); -end +end -- end_of_slave