summaryrefslogtreecommitdiff
path: root/Data/DefaultContent/Libraries/luafun/tests/transformations.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Data/DefaultContent/Libraries/luafun/tests/transformations.lua')
-rw-r--r--Data/DefaultContent/Libraries/luafun/tests/transformations.lua107
1 files changed, 0 insertions, 107 deletions
diff --git a/Data/DefaultContent/Libraries/luafun/tests/transformations.lua b/Data/DefaultContent/Libraries/luafun/tests/transformations.lua
deleted file mode 100644
index b4fddab..0000000
--- a/Data/DefaultContent/Libraries/luafun/tests/transformations.lua
+++ /dev/null
@@ -1,107 +0,0 @@
---------------------------------------------------------------------------------
--- map
---------------------------------------------------------------------------------
-
-fun = function(...) return 'map', ... end
-
-dump(map(fun, range(0)))
---[[test
---test]]
-
-
-dump(map(fun, range(4)))
---[[test
-map 1
-map 2
-map 3
-map 4
---test]]
-
-dump(map(fun, enumerate({"a", "b", "c", "d", "e"})))
---[[test
-map 1 a
-map 2 b
-map 3 c
-map 4 d
-map 5 e
---test]]
-
-dump(map(function(x) return 2 * x end, range(4)))
---[[test
-2
-4
-6
-8
---test]]
-
-fun = nil
---[[test
---test]]
-
---------------------------------------------------------------------------------
--- enumerate
---------------------------------------------------------------------------------
-
-dump(enumerate({"a", "b", "c", "d", "e"}))
---[[test
-1 a
-2 b
-3 c
-4 d
-5 e
---test]]
-
-dump(enumerate(enumerate(enumerate({"a", "b", "c", "d", "e"}))))
---[[test
-1 1 1 a
-2 2 2 b
-3 3 3 c
-4 4 4 d
-5 5 5 e
---test]]
-
-dump(enumerate(zip({"one", "two", "three", "four", "five"},
- {"a", "b", "c", "d", "e"})))
---[[test
-1 one a
-2 two b
-3 three c
-4 four d
-5 five e
---test]]
-
---------------------------------------------------------------------------------
--- intersperse
---------------------------------------------------------------------------------
-
-dump(intersperse("x", {}))
-
-dump(intersperse("x", {"a", "b", "c", "d", "e"}))
---[[test
-a
-x
-b
-x
-c
-x
-d
-x
-e
-x
---test]]
-
-dump(intersperse("x", {"a", "b", "c", "d", "e", "f"}))
---[[test
-a
-x
-b
-x
-c
-x
-d
-x
-e
-x
-f
-x
---test]]