rename examples/tests/{a,b,c,d,e,f} into examples/acceptance_tests/00{1,2,3,4,5,6}

Also added a little Makefile to run them all in one go.
This commit is contained in:
KtorZ
2022-12-13 14:09:17 +01:00
parent b294063097
commit a62fb1905e
20 changed files with 25 additions and 16 deletions

View File

@@ -0,0 +1,2 @@
name = "acceptance_test_003"
version = "0.0.0"

View File

@@ -0,0 +1,14 @@
pub fn foldr(xs: List<a>, f: fn(a, b) -> b, zero: b) -> b {
when xs is {
[] -> zero
[x, ..rest] -> f(x, foldr(rest, f, zero))
}
}
pub fn concat(left: List<a>, right: List<a>) -> List<a> {
foldr(left, fn(x, xs) { [x, ..xs] }, right)
}
test concat_1() {
concat([1, 2, 3], [4, 5, 6]) == [1, 2, 3, 4, 5, 6]
}