Add new acceptance test scenario: 046

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 = []

examples/acceptance_tests/046/aiken.toml

@@ -0,0 +1,3 @@
+name = 'aiken-lang/acceptance_test_046'
+version = '0.0.0'
+description = ''

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
+  }
+}