Remove spaces around typed expression brackets

To match the formatting of other brackets. Fixes mihaimaruseac#638
toku-sa-n · Jan 8, 2023 · c0cc927 · c0cc927
1 parent 6926b7d
commit c0cc927
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/TESTS.md b/TESTS.md
@@ -2678,7 +2678,7 @@ f =
 Typed quote.
 
 ```haskell
-f = [|| a ||]
+f = [||a||]
 ```
 
 Preserve the trailing newline.

diff --git a/src/HIndent/Pretty/Combinators/Wrap.hs b/src/HIndent/Pretty/Combinators/Wrap.hs
@@ -43,9 +43,9 @@ braces = wrap "{" "}"
 brackets :: Printer a -> Printer a
 brackets = wrap "[" "]"
 
--- | Wraps with @[|| @ and @ ||]@.
+-- | Wraps with @[||@ and @||]@.
 typedBrackets :: Printer a -> Printer a
-typedBrackets = wrap "[|| " " ||]"
+typedBrackets = wrap "[||" "||]"
 
 -- | Wraps with double quotes.
 doubleQuotes :: Printer a -> Printer a