mirror of
https://github.com/commercialhaskell/stackage.git
synced 2026-01-12 07:18:31 +01:00
29 lines
950 B
Diff
29 lines
950 B
Diff
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
|
|
}
|