diff --git a/bricks-internal-test.cabal b/bricks-internal-test.cabal
new file mode 100644
--- /dev/null
+++ b/bricks-internal-test.cabal
@@ -0,0 +1,42 @@
+-- This file has been generated from package.yaml by hpack version 0.20.0.
+--
+-- see: https://github.com/sol/hpack
+--
+-- hash: 0102605e86a7c432b4344c0e6488e0062161365637bf0bd6914956408e47c547
+
+name:           bricks-internal-test
+version:        0.0.0.4
+synopsis:       ...
+
+description:    ...
+category:       Language
+homepage:       https://github.com/chris-martin/bricks#readme
+bug-reports:    https://github.com/chris-martin/bricks/issues
+author:         Chris Martin <ch.martin@gmail.com>
+maintainer:     Chris Martin <ch.martin@gmail.com>
+license:        Apache-2.0
+license-file:   license.txt
+build-type:     Simple
+cabal-version:  >= 1.10
+
+source-repository head
+  type: git
+  location: https://github.com/chris-martin/bricks
+
+library
+  hs-source-dirs:
+      src
+  ghc-options: -Wall
+  build-depends:
+      base >=4.9 && <4.11
+    , bricks-internal
+    , containers >=0.5.7 && <0.6
+    , hedgehog >=0.5 && <0.6
+    , template-haskell >=2.2 && <2.13
+    , text >=1.2.2 && <1.3
+  exposed-modules:
+      Bricks.Test.Hedgehog
+      Bricks.Test.QQ
+  other-modules:
+      Paths_bricks_internal_test
+  default-language: Haskell2010
diff --git a/license.txt b/license.txt
new file mode 100644
--- /dev/null
+++ b/license.txt
@@ -0,0 +1,13 @@
+Copyright 2017 Chris Martin
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+    http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.
diff --git a/src/Bricks/Test/Hedgehog.hs b/src/Bricks/Test/Hedgehog.hs
new file mode 100644
--- /dev/null
+++ b/src/Bricks/Test/Hedgehog.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Bricks.Test.Hedgehog
+  ( runTests
+  ) where
+
+-- base
+import           Control.Monad (unless)
+import           Data.Foldable (for_)
+import qualified System.Exit   as Exit
+import qualified System.IO     as IO
+
+-- hedgehog
+import qualified Hedgehog
+
+runTests :: Hedgehog.Group -> IO ()
+runTests tests =
+  do
+    for_ [IO.stdout, IO.stderr] $ \h -> do
+      IO.hSetEncoding h IO.utf8
+      IO.hSetBuffering h IO.LineBuffering
+    success <- Hedgehog.checkParallel tests
+    unless success Exit.exitFailure
diff --git a/src/Bricks/Test/QQ.hs b/src/Bricks/Test/QQ.hs
new file mode 100644
--- /dev/null
+++ b/src/Bricks/Test/QQ.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+module Bricks.Test.QQ
+  ( text
+  ) where
+
+-- Base
+import Control.Arrow ((>>>))
+import Data.Function (const)
+
+-- Template Haskell
+import Language.Haskell.TH
+import Language.Haskell.TH.Quote
+
+-- Text
+import qualified Data.Text as Text
+
+text :: QuasiQuoter
+text =
+  QuasiQuoter
+    { quoteExp  = pure . LitE . StringL . stripMargin
+    , quotePat  = err
+    , quoteType = err
+    , quoteDec  = err
+    }
+  where
+    err = const . fail $ "illegal text QuasiQuote (allowed as expression only)"
+
+stripMargin :: String -> String
+stripMargin =
+  Text.pack
+  >>> Text.splitOn "\n"
+  >>> fmap (\x ->
+        let (a, b) = Text.breakOn "┃" x
+        in  if Text.all (== ' ') a && not (Text.null b)
+            then Text.drop 1 b
+            else x)
+  >>> Text.intercalate "\n"
+  >>> Text.unpack