diff -ru orig/Test/Framework/TH/Prime/Parser.hs new/Test/Framework/TH/Prime/Parser.hs
--- orig/Test/Framework/TH/Prime/Parser.hs	2013-09-02 08:29:48.372542031 +0300
+++ new/Test/Framework/TH/Prime/Parser.hs	2013-09-02 08:29:48.000000000 +0300
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 module Test.Framework.TH.Prime.Parser (
     unitPropTests
   , symbol, string
@@ -66,11 +67,19 @@
         ParseFailed _ _ ->
           []
       where
+#if MIN_VERSION_haskell_src_exts(1, 14, 0)
+        toExtention = parseExtension . toStr
+#else
         toExtention = read . toStr
+#endif
         toStr (Ident str) = str
         toStr (Symbol str) = str
     opt raw = defaultParseMode {
+#if MIN_VERSION_haskell_src_exts(1, 14, 0)
+        extensions = nub $ EnableExtension TemplateHaskell : exts raw
+#else
         extensions = nub $ TemplateHaskell : exts raw
+#endif
       -- to prevent "Ambiguous infix expression"
       , fixities = Nothing
       }