print ':' on same line as name always

2023-04-03 16:08:10 +02:00 · 2023-04-03 16:08:10 +02:00 · 868550327c
parent 29505cbc06
commit 868550327c
1 changed files with 2 additions and 2 deletions
--- a/exe/Main.idr
+++ b/exe/Main.idr
@ -25,8 +25,8 @@ main = do
    Right res <- fromParserIO ["."] seen defs $ loadProcessFile file
      | Left err => die $ prettyError True True err
    for_ res $ \(name, def) => do
-      putDoc $ map termHL $
-        sep [hl Free $ pretty0 True name, colonD,
+      putDoc $ map termHL $ nest 2 $
+        sep [hsep [hl Free $ pretty0 True name, colonD],
             prettyTerm True [<] [<] def.type]

 -----------------------------------