diff options
| author | Greg Brown <greg.brown01@ed.ac.uk> | 2023-01-12 17:55:43 +0000 |
|---|---|---|
| committer | Greg Brown <greg.brown01@ed.ac.uk> | 2023-01-12 17:55:43 +0000 |
| commit | de4275d9728104167726bda4d260c197a40ff3d7 (patch) | |
| tree | b40755a73ec9945f301348857abc657f4bd517d9 /src/Obs/Pretty.idr | |
| parent | 3a521624bb1458333a7fd23a0712cbc1f8fc5e1d (diff) | |
Slightly prettify pretty printing.
Diffstat (limited to 'src/Obs/Pretty.idr')
| -rw-r--r-- | src/Obs/Pretty.idr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Obs/Pretty.idr b/src/Obs/Pretty.idr index 656f352..f32542e 100644 --- a/src/Obs/Pretty.idr +++ b/src/Obs/Pretty.idr @@ -33,7 +33,7 @@ prettyLambda d name body = export prettyApp : (prec : Prec) -> (head : Doc ann) -> (tail : List (Doc ann)) -> Doc ann prettyApp d head tail = - parenthesise (d >= App) $ align $ group $ vsep (align head :: map (hang 2) tail) + parenthesise (d >= App) $ hang 2 $ group $ vsep (align head :: tail) -- first and second are rendered Open export |