tasty-th 0.1.5 → 0.1.6

raw patch · 2 files changed

+4/−4 lines, 2 files

Files

• src/Test/Tasty/TH.hs +3/−3
• tasty-th.cabal +1/−1

@@ -29,8 +29,8 @@  import Control.Monad (join) import Control.Applicative-import Language.Haskell.Exts (parseFileContents)-import Language.Haskell.Exts.Parser (ParseResult(..))+import Language.Haskell.Exts (parseFileContentsWithMode)+import Language.Haskell.Exts.Parser (ParseResult(..), defaultParseMode, parseFilename) import qualified Language.Haskell.Exts.Syntax as S import Language.Haskell.TH import Data.List@@ -91,7 +91,7 @@  where   lexed = map fst . concatMap lex . lines   -  parsed file = case parseFileContents file of+  parsed file = case parseFileContentsWithMode (defaultParseMode { parseFilename = filePath }) file of     ParseOk parsedModule -> Just (declarations parsedModule)     ParseFailed _ _ -> Nothing   declarations (S.Module _ _ _ _ decls) = mapMaybe testFunName decls

@@ -1,5 +1,5 @@ name: tasty-th-version: 0.1.5+version: 0.1.6 cabal-version: >= 1.6 build-type: Simple license: BSD3