mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-11 02:25:39 +03:00
Merge pull request #5195 from unisonweb/force-highlighting
Use `SyntaxText.Unit` as style for `foo()`
This commit is contained in:
commit
2591ade890
@ -490,7 +490,7 @@ pretty0
|
||||
(App' x (Constructor' (ConstructorReference DD.UnitRef 0)), _) | isLeaf x -> do
|
||||
px <- pretty0 (ac (if isBlock x then 0 else 9) Normal im doc) x
|
||||
pure . paren (p >= 11 || isBlock x && p >= 3) $
|
||||
px <> fmt S.DelayForceChar (l "()")
|
||||
px <> fmt S.Unit (l "()")
|
||||
(Apps' f (unsnoc -> Just (args, lastArg)), _)
|
||||
| isSoftHangable lastArg -> do
|
||||
fun <- goNormal 9 f
|
||||
|
Loading…
Reference in New Issue
Block a user