Add new (failing) acceptance test (007)
```
Error: aiken::check
× Checking
╰─▶ Not a function
╭─[./007/lib/test.ak:4:1]
4 │ [(a, b), ..rest] -> {
5 │ let (a_tail, b_tail) = unzip(rest)
· ──────
6 │ ([a, ..a_tail], [b, ..b_tail])
╰────
```
This commit is contained in:
parent
a62fb1905e
commit
022fc36dd2
|
|
@ -0,0 +1,2 @@
|
||||||
|
name = "acceptance_test_007"
|
||||||
|
version = "0.0.0"
|
||||||
|
|
@ -0,0 +1,9 @@
|
||||||
|
pub fn unzip(xs: List<(a, b)>) -> (List<a>, List<b>) {
|
||||||
|
when xs is {
|
||||||
|
[] -> ([], [])
|
||||||
|
[(a, b), ..rest] -> {
|
||||||
|
let (a_tail, b_tail) = unzip(rest)
|
||||||
|
([a, ..a_tail], [b, ..b_tail])
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
Loading…
Reference in New Issue