diff --git a/src/Unused/Types.hs b/src/Unused/Types.hs
index da4d06a..939b5ec 100644
--- a/src/Unused/Types.hs
+++ b/src/Unused/Types.hs
@@ -22,7 +22,7 @@ data TermResults = TermResults
     { matches :: [TermMatch]
     , totalFiles :: Int
     , totalOccurrences :: Int
-    }
+    } deriving Show
 
 type TermMatchSet = Map.Map String TermResults