From a178cee7bf0130233ec725b7fa1657e9b3f58108 Mon Sep 17 00:00:00 2001 From: KtorZ Date: Thu, 19 Jan 2023 18:33:10 +0100 Subject: [PATCH] Add new acceptance test scenario: 046 --- examples/acceptance_tests/046/aiken.lock | 5 +++++ examples/acceptance_tests/046/aiken.toml | 3 +++ examples/acceptance_tests/046/lib/tests.ak | 9 +++++++++ 3 files changed, 17 insertions(+) create mode 100644 examples/acceptance_tests/046/aiken.lock create mode 100644 examples/acceptance_tests/046/aiken.toml create mode 100644 examples/acceptance_tests/046/lib/tests.ak diff --git a/examples/acceptance_tests/046/aiken.lock b/examples/acceptance_tests/046/aiken.lock new file mode 100644 index 00000000..3a78b1e7 --- /dev/null +++ b/examples/acceptance_tests/046/aiken.lock @@ -0,0 +1,5 @@ +# This file was generated by Aiken +# You typically do not need to edit this file + +requirements = [] +packages = [] diff --git a/examples/acceptance_tests/046/aiken.toml b/examples/acceptance_tests/046/aiken.toml new file mode 100644 index 00000000..8101704f --- /dev/null +++ b/examples/acceptance_tests/046/aiken.toml @@ -0,0 +1,3 @@ +name = 'aiken-lang/acceptance_test_046' +version = '0.0.0' +description = '' diff --git a/examples/acceptance_tests/046/lib/tests.ak b/examples/acceptance_tests/046/lib/tests.ak new file mode 100644 index 00000000..009e1272 --- /dev/null +++ b/examples/acceptance_tests/046/lib/tests.ak @@ -0,0 +1,9 @@ +test sort_by_1() { + let xs = [[4, 3, 2, 1], [2, 3, 4, 5]] + when xs is { + [[], ys] -> True + [xs, []] -> True + [[x, ..xs2], [y, ..ys2]] -> True + _ -> True + } +}