summaryrefslogtreecommitdiff
path: root/source3/lua-5.1.4/test/factorial.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/factorial.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/factorial.lua')
-rw-r--r--source3/lua-5.1.4/test/factorial.lua32
1 files changed, 0 insertions, 32 deletions
diff --git a/source3/lua-5.1.4/test/factorial.lua b/source3/lua-5.1.4/test/factorial.lua
deleted file mode 100644
index 7c4cf0fa45..0000000000
--- a/source3/lua-5.1.4/test/factorial.lua
+++ /dev/null
@@ -1,32 +0,0 @@
--- function closures are powerful
-
--- traditional fixed-point operator from functional programming
-Y = function (g)
- local a = function (f) return f(f) end
- return a(function (f)
- return g(function (x)
- local c=f(f)
- return c(x)
- end)
- end)
-end
-
-
--- factorial without recursion
-F = function (f)
- return function (n)
- if n == 0 then return 1
- else return n*f(n-1) end
- end
- end
-
-factorial = Y(F) -- factorial is the fixed point of F
-
--- now test it
-function test(x)
- io.write(x,"! = ",factorial(x),"\n")
-end
-
-for n=0,16 do
- test(n)
-end