From 2c1a0485f70586e8d4fc20c280101aa4e5b97c37 Mon Sep 17 00:00:00 2001 From: Paul Chiusano Date: Tue, 9 Jul 2024 15:17:46 -0400 Subject: [PATCH] Don't use DelayForceChar as syntax style for `blah.default()` --- parser-typechecker/src/Unison/Syntax/TermPrinter.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/parser-typechecker/src/Unison/Syntax/TermPrinter.hs b/parser-typechecker/src/Unison/Syntax/TermPrinter.hs index 08b805c4dd..59d27cae36 100644 --- a/parser-typechecker/src/Unison/Syntax/TermPrinter.hs +++ b/parser-typechecker/src/Unison/Syntax/TermPrinter.hs @@ -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