test-framework-th-prime 0.0.6 → 0.0.7

raw patch · 2 files changed

+7/−2 lines, 2 files

Files

• Test/Framework/TH/Prime/Parser.hs +6/−1
• test-framework-th-prime.cabal +1/−1

@@ -91,12 +91,17 @@ isFunBind _           = False  isPatBind :: Decl -> Bool-isPatBind (PatBind _ _ _ _ _) = True+isPatBind PatBind{} = True isPatBind _                   = False  fromPatBind :: Decl -> String+#if MIN_VERSION_haskell_src_exts(1, 16, 0)+fromPatBind (PatBind _ (PVar (Ident  name)) _ _) = name+fromPatBind (PatBind _ (PVar (Symbol name)) _ _) = name+#else fromPatBind (PatBind _ (PVar (Ident  name)) _ _ _) = name fromPatBind (PatBind _ (PVar (Symbol name)) _ _ _) = name+#endif fromPatBind _ = error "fromPatBind"  fromFunBind :: Decl -> String

@@ -1,5 +1,5 @@ Name:                   test-framework-th-prime-Version:                0.0.6+Version:                0.0.7 Author:                 Kazu Yamamoto <kazu@iij.ad.jp> Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp> License:                BSD3