diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,13 @@
 Brick changelog
 ---------------
 
+0.57.1
+------
+
+Bug fixes:
+ * Fixed a small space leak in the main rendering loop (#260)
+ * Get `TailDemo` building on more versions of GHC
+
 0.57
 ----
 
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -41,7 +41,8 @@
 -----------------
 
 To get an idea of what some people have done with `brick`, take a look
-at these projects:
+at these projects. If you have made something and would like me to
+include it, get in touch!
 
 | Project | Description |
 | ------- | ----------- |
diff --git a/brick.cabal b/brick.cabal
--- a/brick.cabal
+++ b/brick.cabal
@@ -1,5 +1,5 @@
 name:                brick
-version:             0.57
+version:             0.57.1
 synopsis:            A declarative terminal user interface library
 description:
   Write terminal user interfaces (TUIs) painlessly with 'brick'! You
@@ -32,7 +32,7 @@
 license-file:        LICENSE
 author:              Jonathan Daugherty <cygnus@foobox.com>
 maintainer:          Jonathan Daugherty <cygnus@foobox.com>
-copyright:           (c) Jonathan Daugherty 2015-2018
+copyright:           (c) Jonathan Daugherty 2015-2020
 category:            Graphics
 build-type:          Simple
 cabal-version:       1.18
diff --git a/programs/TailDemo.hs b/programs/TailDemo.hs
--- a/programs/TailDemo.hs
+++ b/programs/TailDemo.hs
@@ -1,6 +1,12 @@
 {-# LANGUAGE OverloadedStrings #-}
 module Main where
 
+#if !MIN_VERSION_base(4,8,0)
+import Control.Applicative ((<$>))
+#endif
+#if !(MIN_VERSION_base(4,11,0))
+import Data.Monoid ((<>))
+#endif
 import qualified Data.Text as T
 import Control.Monad (void)
 import Control.Concurrent
diff --git a/src/Brick/Types/Internal.hs b/src/Brick/Types/Internal.hs
--- a/src/Brick/Types/Internal.hs
+++ b/src/Brick/Types/Internal.hs
@@ -247,11 +247,11 @@
                     deriving (Show, Eq, Ord)
 
 data RenderState n =
-    RS { viewportMap :: M.Map n Viewport
-       , rsScrollRequests :: [(n, ScrollRequest)]
+    RS { viewportMap :: !(M.Map n Viewport)
+       , rsScrollRequests :: ![(n, ScrollRequest)]
        , observedNames :: !(S.Set n)
-       , renderCache :: M.Map n (Result n)
-       , clickableNames :: [n]
+       , renderCache :: !(M.Map n (Result n))
+       , clickableNames :: ![n]
        } deriving (Read, Show, Generic, NFData)
 
 data EventRO n = EventRO { eventViewportMap :: M.Map n Viewport
diff --git a/src/Brick/Widgets/List.hs b/src/Brick/Widgets/List.hs
--- a/src/Brick/Widgets/List.hs
+++ b/src/Brick/Widgets/List.hs
@@ -88,7 +88,10 @@
 import Data.Functor (($>))
 import Data.List.NonEmpty (NonEmpty((:|)))
 import Data.Maybe (fromMaybe)
-import Data.Semigroup (Semigroup, (<>), sconcat)
+#if !(MIN_VERSION_base(4,11,0))
+import Data.Semigroup (Semigroup, (<>))
+#endif
+import Data.Semigroup (sconcat)
 import qualified Data.Sequence as Seq
 import Graphics.Vty (Event(..), Key(..), Modifier(..))
 import qualified Data.Vector as V