From 2664599adaad73bcdd513dfd22e64b874e676246 Mon Sep 17 00:00:00 2001
From: Alexander Esgen <alexander.esgen@tweag.io>
Date: Sun, 20 Oct 2024 16:06:09 +0200
Subject: [PATCH] wip multi-line strings

---
 src/Ormolu/Printer/Meat/Declaration/Value.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/Ormolu/Printer/Meat/Declaration/Value.hs b/src/Ormolu/Printer/Meat/Declaration/Value.hs
index c4fe4a93d..b8dbe4d2c 100644
--- a/src/Ormolu/Printer/Meat/Declaration/Value.hs
+++ b/src/Ormolu/Printer/Meat/Declaration/Value.hs
@@ -618,6 +618,8 @@ p_hsExpr' isApp s = \case
     case lit of
       HsString (SourceText stxt) _ -> p_stringLit stxt
       HsStringPrim (SourceText stxt) _ -> p_stringLit stxt
+      -- TODO format specially, also at the type level
+      HsMultilineString (SourceText stxt) _ -> p_stringLit stxt
       r -> atom r
   HsLam _ variant mgroup ->
     p_lam isApp variant exprPlacement p_hsExpr mgroup