git.iko.soy/stackage
on master help sign in
Updated a patch
04d6506Michael Snoyman
patching/patches/test-framework-th-prime-0.0.5.patch+21−5
compare with master
unifiedsplit
@@ -1,12 +1,28 @@
1diff -ru orig/Test/Framework/TH/Prime/Parser.hs new/Test/Framework/TH/Prime/Parser.hs
1diff -ru orig/Test/Framework/TH/Prime/Parser.hs new/Test/Framework/TH/Prime/Parser.hs
2−--- orig/Test/Framework/TH/Prime/Parser.hs 2013-09-01 16:25:06.353768490 +0300
2+--- orig/Test/Framework/TH/Prime/Parser.hs 2013-09-02 08:29:48.372542031 +0300
3−+++ new/Test/Framework/TH/Prime/Parser.hs 2013-09-01 16:25:06.000000000 +0300
3++++ new/Test/Framework/TH/Prime/Parser.hs 2013-09-02 08:29:48.000000000 +0300
4−@@ -70,7 +70,7 @@
4+@@ -1,3 +1,4 @@
5++{-# LANGUAGE CPP #-}
6+ module Test.Framework.TH.Prime.Parser (
7+ unitPropTests
8+ , symbol, string
9+@@ -66,11 +67,19 @@
10+ ParseFailed _ _ ->
11+ []
12+ where
13++#if MIN_VERSION_haskell_src_exts(1, 14, 0)
14++ toExtention = parseExtension . toStr
15++#else
16+ toExtention = read . toStr
17++#endif
5 toStr (Ident str) = str
18 toStr (Ident str) = str
6 toStr (Symbol str) = str
19 toStr (Symbol str) = str
7 opt raw = defaultParseMode {
20 opt raw = defaultParseMode {
21++#if MIN_VERSION_haskell_src_exts(1, 14, 0)
8−- extensions = nub $ TemplateHaskell : exts raw
22++ extensions = nub $ EnableExtension TemplateHaskell : exts raw
23++#else
9−+ extensions = map UnknownExtension $ nub $ "TemplateHaskell" : exts raw
24+ extensions = nub $ TemplateHaskell : exts raw
25++#endif
10 -- to prevent "Ambiguous infix expression"
26 -- to prevent "Ambiguous infix expression"
11 , fixities = Nothing
27 , fixities = Nothing
12 }
28 }