From 2b4811c8430dcbec09c67b73e8f939b4047f1aec Mon Sep 17 00:00:00 2001 From: Matthew Wild Date: Sat, 26 Feb 2011 00:23:48 +0000 Subject: tools/migration/*: Numerous changes and restructuring, and the addition of a Makefile --- tools/migration/mtools.lua | 56 ---------------------------------------------- 1 file changed, 56 deletions(-) delete mode 100644 tools/migration/mtools.lua (limited to 'tools/migration/mtools.lua') diff --git a/tools/migration/mtools.lua b/tools/migration/mtools.lua deleted file mode 100644 index e7b774bb..00000000 --- a/tools/migration/mtools.lua +++ /dev/null @@ -1,56 +0,0 @@ - - -local print = print; -local t_insert = table.insert; -local t_sort = table.sort; - -module "mtools" - -function sorted(params) - - local reader = params.reader; -- iterator to get items from - local sorter = params.sorter; -- sorting function - local filter = params.filter; -- filter function - - local cache = {}; - for item in reader do - if filter then item = filter(item); end - if item then t_insert(cache, item); end - end - if sorter then - t_sort(cache, sorter); - end - local i = 0; - return function() - i = i + 1; - return cache[i]; - end; - -end - -function merged(reader, merger) - - local item1 = reader(); - local merged = { item1 }; - return function() - while true do - if not item1 then return nil; end - local item2 = reader(); - if not item2 then item1 = nil; return merged; end - if merger(item1, item2) then - --print("merged") - item1 = item2; - t_insert(merged, item1); - else - --print("unmerged", merged) - item1 = item2; - local tmp = merged; - merged = { item1 }; - return tmp; - end - end - end; - -end - -return _M; -- cgit v1.2.3