From f53caff53830f9400641518a3c9cf9eeb22631f1 Mon Sep 17 00:00:00 2001 From: KtorZ Date: Tue, 13 Dec 2022 22:49:55 +0100 Subject: [PATCH] Add new acceptance test scenario (011) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit ``` Error: × Main thread panicked. ├─▶ at crates/lang/src/uplc.rs:4022:40 ╰─▶ called `Option::unwrap()` on a `None` value ``` --- examples/acceptance_tests/011/aiken.toml | 2 ++ examples/acceptance_tests/011/lib/test.ak | 10 ++++++++++ 2 files changed, 12 insertions(+) create mode 100644 examples/acceptance_tests/011/aiken.toml create mode 100644 examples/acceptance_tests/011/lib/test.ak diff --git a/examples/acceptance_tests/011/aiken.toml b/examples/acceptance_tests/011/aiken.toml new file mode 100644 index 00000000..929d7fd5 --- /dev/null +++ b/examples/acceptance_tests/011/aiken.toml @@ -0,0 +1,2 @@ +name = "acceptance_test_011" +version = "0.0.0" diff --git a/examples/acceptance_tests/011/lib/test.ak b/examples/acceptance_tests/011/lib/test.ak new file mode 100644 index 00000000..9c515622 --- /dev/null +++ b/examples/acceptance_tests/011/lib/test.ak @@ -0,0 +1,10 @@ +pub fn map(xs: List, f: fn(a) -> result) -> List { + when xs is { + [] -> [] + [x, ..rest] -> [f(x), ..map(rest, f)] + } +} + +test map_1() { + map([], fn(n) { n + 1 }) == [] +}