9 lines
147 B
Text
9 lines
147 B
Text
procedure main()
|
|
local lst
|
|
lst := [10, 20, 30, 40]
|
|
every callback(write,!lst)
|
|
end
|
|
|
|
procedure callback(p,arg)
|
|
return p(" -> ", arg)
|
|
end
|