Add test samples for Nickel extended patterns

tweag · Jun 5, 2024 · be73d73 · be73d73
1 parent d7c045a
commit be73d73
Show file tree

Hide file tree

Showing 2 changed files with 54 additions and 2 deletions.
diff --git a/topiary-cli/tests/samples/expected/nickel.ncl b/topiary-cli/tests/samples/expected/nickel.ncl
@@ -89,7 +89,34 @@
         }
       } => null,
       _ => null,
-    }
+    },
+
+    # Extended pattern formatting
+    match {
+      { foo, bar } if foo == 'Hello
+        && bar == 'Goodbye =>
+        "multi"
+        ++ "line"
+        ++ "result",
+      { foo, bar } if foo == 'Hello
+        && bar == 'Goodbye => "single line result",
+      { x, y, ..rest }
+      or { x }
+      or { y } => null,
+      {
+        foo = [
+          x,
+          _,
+          z,
+          ..rest
+        ],
+        bar = [
+          1,
+          2,
+          _
+        ]
+      } => null,
+    },
   ],
 
   # Nickel standard library as of af0d5ee

diff --git a/topiary-cli/tests/samples/input/nickel.ncl b/topiary-cli/tests/samples/input/nickel.ncl
@@ -85,7 +85,32 @@
         }
       } => null,
       _ => null,
-    }
+    },
+
+    # Extended pattern formatting
+    match {
+        {foo, bar}
+if
+foo == 'Hello &&
+bar == 'Goodbye
+=>
+    "multi"
+    ++ "line"
+    ++ "result",
+
+        {foo, bar}
+if
+foo == 'Hello &&
+bar == 'Goodbye
+=> "single line result",
+
+    {x, y, ..rest} or {x} or
+    {y} => null,
+
+    {foo = [x, _,
+    z, ..rest], bar = [1,
+    2, _]} => null,
+},
   ],
 
   # Nickel standard library as of af0d5ee