chore: add a test for formatting assignment patterns

crates/aiken-lang/src/tests/format.rs

@@ -473,6 +473,34 @@ fn format_newline_module_comments() {
     );
 }
 
+#[test]
+fn format_many_assignment_patterns() {
+    assert_format!(
+        r#"
+        fn backpassing() -> Int {
+        
+          let
+            elem, accumulator, wow,
+            who,
+            thing,
+            what,
+            idk,
+            wee,
+            will,
+            it,
+            break,
+
+
+
+          <- fold([1, 2, 3],
+          0)
+
+          elem + accumulator
+        }
+        "#
+    );
+}
+
 #[test]
 fn format_bytearray_literals() {
     assert_format!(

crates/aiken-lang/src/tests/snapshots/format_many_assignment_patterns.snap

@@ -0,0 +1,21 @@
+---
+source: crates/aiken-lang/src/tests/format.rs
+description: "Code:\n\nfn backpassing() -> Int {\n\n  let\n    elem, accumulator, wow,\n    who,\n    thing,\n    what,\n    idk,\n    wee,\n    will,\n    it,\n    break,\n\n\n\n  <- fold([1, 2, 3],\n  0)\n\n  elem + accumulator\n}\n"
+---
+fn backpassing() -> Int {
+  let
+    elem,
+    accumulator,
+    wow,
+    who,
+    thing,
+    what,
+    idk,
+    wee,
+    will,
+    it,
+    break,
+  <- fold([1, 2, 3], 0)
+
+  elem + accumulator
+}