diff options
| author | Danny Navarro <j@dannynavarro.net> | 2015-09-16 10:12:36 +0200 |
|---|---|---|
| committer | Danny Navarro <j@dannynavarro.net> | 2015-09-16 10:13:44 +0200 |
| commit | ee0e0c3d1f1c259555d246df1be1c9e5b9be0e35 (patch) | |
| tree | 9a90ec44886baa9ce7f4a6099d3c8628d8b86ef9 /tests/golden.hs | |
| parent | 82a380079c678c5059a9964a60e76352762dd580 (diff) | |
| download | graphql-ee0e0c3d1f1c259555d246df1be1c9e5b9be0e35.tar.gz | |
Use Cabal data-files to access golden tests data
Fixes #1.
Diffstat (limited to 'tests/golden.hs')
| -rw-r--r-- | tests/golden.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/golden.hs b/tests/golden.hs index e7ab70f..2323a97 100644 --- a/tests/golden.hs +++ b/tests/golden.hs @@ -8,14 +8,14 @@ import qualified Data.Text.IO as TIO import Test.Tasty (defaultMain) import Test.Tasty.Golden (goldenVsString) +import Paths_graphql (getDataFileName) import Data.GraphQL.Parser (document) main :: IO () main = defaultMain - $ goldenVsString "kitchen-sink.graphql" - "./tests/data/kitchen-sink.graphql.golden" - (parse "./tests/data/kitchen-sink.graphql") + =<< goldenVsString "kitchen-sink.graphql" + <$> getDataFileName "tests/data/kitchen-sink.graphql.graphql.golden" + <*> (parse <$> getDataFileName "tests/data/kitchen-sink.graphql") where parse = fmap (parseOnly document) . TIO.readFile >=> pure . either B8.pack (flip B8.snoc '\n' . B8.pack . show) - |