summaryrefslogtreecommitdiff
path: root/source3/lua-5.1.4/test/sieve.lua
diff options
context:
space:
mode:
authorVolker Lendecke <vl@samba.org>2009-09-29 13:11:20 +0200
committerVolker Lendecke <vl@samba.org>2009-09-29 13:51:43 +0200
commit0cf317f36f7582cb0540c74910020c9d5f4aa14f (patch)
treee5e46fd025976c2a6955d34435201969f1178b01 /source3/lua-5.1.4/test/sieve.lua
parent64e08fef16001d62b43f6925a26ad739391cface (diff)
downloadsamba-0cf317f36f7582cb0540c74910020c9d5f4aa14f.tar.gz
samba-0cf317f36f7582cb0540c74910020c9d5f4aa14f.tar.bz2
samba-0cf317f36f7582cb0540c74910020c9d5f4aa14f.zip
s3: Remove the lua interpreter again
This was meant to support async winbind. But as the hairy parts of async winbind (getgrent) are done without it, it can go again.
Diffstat (limited to 'source3/lua-5.1.4/test/sieve.lua')
-rw-r--r--source3/lua-5.1.4/test/sieve.lua29
1 files changed, 0 insertions, 29 deletions
diff --git a/source3/lua-5.1.4/test/sieve.lua b/source3/lua-5.1.4/test/sieve.lua
deleted file mode 100644
index 0871bb2125..0000000000
--- a/source3/lua-5.1.4/test/sieve.lua
+++ /dev/null
@@ -1,29 +0,0 @@
--- the sieve of of Eratosthenes programmed with coroutines
--- typical usage: lua -e N=1000 sieve.lua | column
-
--- generate all the numbers from 2 to n
-function gen (n)
- return coroutine.wrap(function ()
- for i=2,n do coroutine.yield(i) end
- end)
-end
-
--- filter the numbers generated by `g', removing multiples of `p'
-function filter (p, g)
- return coroutine.wrap(function ()
- while 1 do
- local n = g()
- if n == nil then return end
- if math.mod(n, p) ~= 0 then coroutine.yield(n) end
- end
- end)
-end
-
-N=N or 1000 -- from command line
-x = gen(N) -- generate primes up to N
-while 1 do
- local n = x() -- pick a number until done
- if n == nil then break end
- print(n) -- must be a prime number
- x = filter(n, x) -- now remove its multiples
-end