RosettaCodeData/Task/Call-a-function/Lingo/call-a-function-5.lingo

8 lines
113 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
on sum ()
res = 0
repeat with i = 1 to the paramCount
res = res + param(i)
end repeat
return res
end