softline' -> softline

swarm-game · Jun 15, 2024 · 3e1cdbc · 3e1cdbc
1 parent ba09e0c
commit 3e1cdbc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/swarm-lang/Swarm/Language/Pretty.hs b/src/swarm-lang/Swarm/Language/Pretty.hs
@@ -186,7 +186,7 @@ instance (UnchainableFun t, PrettyPrec t, SubstRec t) => PrettyPrec (TypeF t) wh
       let (iniF, lastF) = unsnocNE $ ty1 <| unchainFun ty2
           funs = (prettyPrec 2 <$> iniF) <> [prettyPrec 1 lastF]
           inLine l r = l <+> "->" <+> r
-          multiLine l r = l <+> "->" <+> softline' <> r
+          multiLine l r = l <+> "->" <+> softline <> r
        in pparens (p > 1) . align $
             flatAlt (concatWith multiLine funs) (concatWith inLine funs)
     TyRecF x ty ->