More readable with linebreaks.

razetime · May 27, 2023 · 5e698b7 · 5e698b7
1 parent 710fed5
commit 5e698b7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Futhark/IR/SegOp.hs b/src/Futhark/IR/SegOp.hs
@@ -381,7 +381,7 @@ instance PrettyRep rep => Pretty (KernelBody rep) where
   pretty (KernelBody _ stms res) =
     PP.stack (map pretty (stmsToList stms))
       </> "return"
-      <+> PP.braces (PP.commasep $ map pretty res)
+      <+> PP.braces (PP.commastack $ map pretty res)
 
 certAnnots :: Certs -> [Doc ann]
 certAnnots cs