X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a82dc808b0cbd982bdc787a7b0a6721b01f3c116..ca4a04698d26f472454bbe75c18199ccb7db135f:/examples/lua/multi_matrix/sender.lua diff --git a/examples/lua/multi_matrix/sender.lua b/examples/lua/multi_matrix/sender.lua index bdf535f70e..c942ba3937 100644 --- a/examples/lua/multi_matrix/sender.lua +++ b/examples/lua/multi_matrix/sender.lua @@ -1,26 +1,32 @@ -function Sender(...) +-- Copyright (c) 2011, 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. + +function Sender(...) simgrid.info("Hello From Sender") - local receiver = simgrid.host.get_by_name(arg[1]) - local task_comp = arg[2] - local task_comm = arg[3] - local rec_alias = arg[4] + local receiver = simgrid.host.get_by_name(select(1, ...)) + local task_comp = select(2, ...) + local task_comm = select(3, ...) + local rec_alias = select(4, ...) local size = 4 local m1 = mkmatrix(size, size) local m2 = mkmatrix(size, size) - if #arg ~= 4 then + if select("#", ...) ~= 4 then error("Argc should be 4") end - simgrid.info("Argc=" .. (#arg) .. " (should be 4)") + simgrid.info("Argc=" .. select("#", ...) .. " (should be 4)") -- Sending Task local task = simgrid.task.new("matrix_task", task_comp, task_comm) task['matrix_1'] = m1 task['matrix_2'] = m2 task['size'] = size - simgrid.info("Sending " .. simgrid.task.name(task) .. " to " .. simgrid.host.name(receiver)) + simgrid.info("Sending " .. simgrid.task.get_name(task) .. " to " .. simgrid.host.name(receiver)) simgrid.task.send(task, rec_alias) simgrid.info("Got the Multiplication result ...Bye") end