Mercurial > luatraverse / file comparison
comparison: luatraverse.lua
luatraverse.lua
- changeset 8
- b75900150167
- parent 7
- 258aedad056c
- child 11
- 1e2c945346ca
equal
deleted
inserted
replaced
| 7:258aedad056c | 8:b75900150167 |
|---|---|
| 6 -- | 6 -- |
| 7 -- Alexandra Barros - 2006.03.15 | 7 -- Alexandra Barros - 2006.03.15 |
| 8 ------------------------------------------------------------------------------- | 8 ------------------------------------------------------------------------------- |
| 9 | 9 |
| 10 module("traverse", package.seeall) | 10 module("traverse", package.seeall) |
| 11 local traverse = _M; | |
| 12 | 11 |
| 13 local List = {} | 12 local List = {} |
| 14 | 13 |
| 15 function List.new () | 14 function List.new () |
| 16 return {first = 0, last = -1} | 15 return {first = 0, last = -1} |
| 89 | 88 |
| 90 while not List.isempty(env.list) do | 89 while not List.isempty(env.list) do |
| 91 | 90 |
| 92 local obj = List.pop(env.list) | 91 local obj = List.pop(env.list) |
| 93 local t = type(obj) | 92 local t = type(obj) |
| 94 traverse["traverse" .. t](env, obj) | 93 _M["traverse" .. t](env, obj) |
| 95 | 94 |
| 96 end | 95 end |
| 97 | 96 |
| 98 end | 97 end |
| 99 | 98 |
