From 27d6efb5f5a076f825fe2da1875e0cabaf02b4e7 Mon Sep 17 00:00:00 2001 From: chai Date: Wed, 17 Nov 2021 23:03:07 +0800 Subject: + LuaMacro --- Tools/LuaMacro/tests/test-lambda.lua | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 Tools/LuaMacro/tests/test-lambda.lua (limited to 'Tools/LuaMacro/tests/test-lambda.lua') diff --git a/Tools/LuaMacro/tests/test-lambda.lua b/Tools/LuaMacro/tests/test-lambda.lua new file mode 100644 index 0000000..649b77d --- /dev/null +++ b/Tools/LuaMacro/tests/test-lambda.lua @@ -0,0 +1,18 @@ +require_ 'macro.lambda' +ok = pcall(require,'pl') +if not ok then return print 'test-lambda needs penlight' end +ls = List{10,20,30} +assert(ls:map(\x(x+1)) == List{11,21,31}) +assert((\(42))() == 42 ) + +F = \x,y(x - y) + +G = \x(F(x,10)) + +assert(G(11) == 1) + +ls = List { (\(10,20,30))() } +assert(ls == List{10,20,30}) + + + -- cgit v1.1-26-g67d0