fibfor.lua

来自「一个symbian 冒险游戏代码」· LUA 代码 · 共 14 行

-- example of for with generator functions

function generatefib (n)
  return coroutine.wrap(function ()
    local a,b = 1, 1
    while a <= n do
      coroutine.yield(a)
      a, b = b, a+b
    end
  end, n)
end

for i in generatefib(1000) do print(i) end