diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,5 +1,12 @@
 # doclayout
 
+## 0.3.0.1
+
+ * NOINLINE `fromString` (#1).
+   @sjakobi reports that this change reduced total allocations
+   for building pandoc-2.12 with GHC 8.10.4 by 8.5% and reduced
+   peak allocations are reduced from 3854MB to 3389MB.
+
 ## 0.3
 
   * Add foldlChar to signature of HasChars [API change].
diff --git a/doclayout.cabal b/doclayout.cabal
--- a/doclayout.cabal
+++ b/doclayout.cabal
@@ -1,5 +1,5 @@
 name:                doclayout
-version:             0.3
+version:             0.3.0.1
 synopsis:            A prettyprinting library for laying out text documents.
 description:         doclayout is a prettyprinting library for laying out
                      text documents, with several features not present
diff --git a/src/Text/DocLayout.hs b/src/Text/DocLayout.hs
--- a/src/Text/DocLayout.hs
+++ b/src/Text/DocLayout.hs
@@ -165,6 +165,7 @@
 
 instance HasChars a => IsString (Doc a) where
   fromString = text
+  {-# NOINLINE fromString #-}
 
 -- | Unfold a 'Doc' into a flat list.
 unfoldD :: Doc a -> [Doc a]