fix(grainfmt): Correctly add space between arguments in enum pattern (#…

…865)
grain-lang · Sep 6, 2021 · 8c647fa · 8c647fa
1 parent f15f37b
commit 8c647fa
Show file tree

Hide file tree

Showing 3 changed files with 18 additions and 1 deletion.
diff --git a/compiler/grainformat/reformat.re b/compiler/grainformat/reformat.re
@@ -720,7 +720,7 @@ and print_pattern =
             if (List.length(patterns) > 0) {
               add_parens(
                 Doc.join(
-                  Doc.comma,
+                  Doc.concat([Doc.comma, Doc.space]),
                   List.map(
                     pat => print_pattern(~pat, ~parent_loc, ~original_source),
                     patterns,

diff --git a/compiler/test/formatter_inputs/matches.gr b/compiler/test/formatter_inputs/matches.gr
@@ -18,3 +18,13 @@ export let pop = (queue) => {
         { forwards: [head, ...ftail], backwards } => { forwards: ftail, backwards }
     }
 }
+
+enum Foo<a, b, c> { A(a, b), B(b, c) }
+
+match (A(1, 2)) {
+    A(a,b) => true,
+    B(
+        b,
+        c
+    ) => false
+}
diff --git a/compiler/test/formatter_outputs/matches.gr b/compiler/test/formatter_outputs/matches.gr
@@ -22,3 +22,10 @@ export let pop = queue => {
     { forwards: [head, ...ftail], backwards } => { forwards: ftail, backwards },
   }
 }
+
+enum Foo<a, b, c> { A(a, b), B(b, c) }
+
+match (A(1, 2)) {
+  A(a, b) => true,
+  B(b, c) => false,
+}