diff --git a/aeson-qq.cabal b/aeson-qq.cabal
--- a/aeson-qq.cabal
+++ b/aeson-qq.cabal
@@ -1,5 +1,5 @@
 name:             aeson-qq
-version:          0.7.1
+version:          0.7.2
 synopsis:         JSON quasiquoter for Haskell
 description:      @aeson-qq@ provides a JSON quasiquoter for Haskell.
                   .
@@ -49,7 +49,7 @@
   ghc-options:
       -Wall
   hs-source-dirs:
-      test
+      src, test
   main-is:
       Spec.hs
   other-modules:
@@ -57,6 +57,12 @@
       Data.Aeson.QQSpec
   build-depends:
       base >= 4.6 && < 5
-    , aeson-qq
+    , text
+    , vector
+    , aeson
+    , parsec
+    , template-haskell
+    , haskell-src-meta
+
     , aeson
     , hspec
diff --git a/src/Data/JSON/QQ.hs b/src/Data/JSON/QQ.hs
--- a/src/Data/JSON/QQ.hs
+++ b/src/Data/JSON/QQ.hs
@@ -15,23 +15,25 @@
 import Language.Haskell.Meta.Parse
 
 parsedJson :: String -> Either ParseError JsonValue
-parsedJson txt = parse jpValue "txt" txt
+parsedJson = parse (jpValue <* eof) "txt"
 
 -------
 -- Internal representation
 
 data JsonValue =
-  JsonNull
+    JsonNull
   | JsonString String
   | JsonNumber Bool Rational
   | JsonObject [(HashKey,JsonValue)]
   | JsonArray [JsonValue]
   | JsonBool Bool
   | JsonCode Exp
+  deriving (Eq, Show)
 
 data HashKey =
-  HashVarKey String
+    HashVarKey String
   | HashStringKey String
+  deriving (Eq, Show)
 
 type JsonParser = Parser JsonValue