diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,8 @@
+Changes in 1.7
+  * Add a dependency on package Text
+    - Adds an instance for `PrettyVal Text`
+    - Paves the road for using `Text` in the representation of values.
+
 Changes in 1.6.16
   * Fixes to accomodate GHC 8.4
 
diff --git a/Text/Show/PrettyVal.hs b/Text/Show/PrettyVal.hs
--- a/Text/Show/PrettyVal.hs
+++ b/Text/Show/PrettyVal.hs
@@ -8,6 +8,8 @@
 module Text.Show.PrettyVal ( PrettyVal(prettyVal) ) where
 
 import Text.Show.Value
+import Data.Text(Text)
+import qualified Data.Text as Text
 
 #ifndef NO_GENERICS
 import Data.Ratio
@@ -67,6 +69,7 @@
 
 instance (GDump f, Selector s) => GDump (M1 S s f) where
   gdump it@(M1 x) = repeat (selName it) `zip` map snd (gdump x)
+#endif
 
 oneVal :: [(Name,Value)] -> Value
 oneVal x =
@@ -108,23 +111,26 @@
 
 instance (PrettyVal a1, PrettyVal a2) => PrettyVal (a1,a2)
 instance (PrettyVal a1, PrettyVal a2, PrettyVal a3) => PrettyVal (a1,a2,a3)
-instance (PrettyVal a1, PrettyVal a2, PrettyVal a3,
-          PrettyVal a4) => PrettyVal (a1,a2,a3,a4)
+instance (PrettyVal a1, PrettyVal a2, PrettyVal a3, PrettyVal a4) =>
+  PrettyVal (a1,a2,a3,a4)
 
 instance (PrettyVal a1, PrettyVal a2, PrettyVal a3,
           PrettyVal a4, PrettyVal a5) => PrettyVal (a1,a2,a3,a4,a5)
 
 instance (PrettyVal a1, PrettyVal a2, PrettyVal a3,
-          PrettyVal a4, PrettyVal a5, PrettyVal a6) => PrettyVal (a1,a2,a3,a4,a5,a6)
+          PrettyVal a4, PrettyVal a5, PrettyVal a6) =>
+  PrettyVal (a1,a2,a3,a4,a5,a6)
 
 instance (PrettyVal a1, PrettyVal a2, PrettyVal a3,
-          PrettyVal a4, PrettyVal a5, PrettyVal a6, PrettyVal a7)
-  => PrettyVal (a1,a2,a3,a4,a5,a6,a7)
+          PrettyVal a4, PrettyVal a5, PrettyVal a6, PrettyVal a7) =>
+  PrettyVal (a1,a2,a3,a4,a5,a6,a7)
 
 instance PrettyVal Bool
 instance PrettyVal Ordering
 instance PrettyVal a => PrettyVal (Maybe a)
 instance (PrettyVal a, PrettyVal b) => PrettyVal (Either a b)
 
-#endif
+instance PrettyVal Text where
+  prettyVal = String . Text.unpack
+
 
diff --git a/pretty-show.cabal b/pretty-show.cabal
--- a/pretty-show.cabal
+++ b/pretty-show.cabal
@@ -1,5 +1,5 @@
 name:           pretty-show
-version:        1.6.16
+version:        1.7
 category:       Text
 
 synopsis:       Tools for working with derived `Show` instances and generic
@@ -49,6 +49,7 @@
     base           >= 4.5  &&  < 5,
     haskell-lexer  >= 1    &&  < 2,
     pretty         >= 1    &&  < 2,
+    text,
     filepath,
     ghc-prim
   ghc-options: -Wall -O2