diff options
author | Ben Gamari <ben@smart-cactus.org> | 2016-02-08 14:25:49 +0100 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2016-02-08 14:54:56 +0100 |
commit | 4ca91adcbd26dfa5f102244f8170c5c74f5200db (patch) | |
tree | c46673b85fba14b889940bd9b4e09cc9dd9490e0 /hoogle-test | |
parent | 25b8d00a149098d9b7842600dbb93f40836b4546 (diff) |
testsuite: Rework handling of output sanitization
Previously un-cleaned artifacts were kept as reference output, making
it difficult to tell what has changed and causing spurious changes in
the version control history. Here we rework this, cleaning the output
during acceptance. To accomplish this it was necessary to move to strict
I/O to ensure the reference handle was closed before accept attempts to
open the reference file.
Diffstat (limited to 'hoogle-test')
-rw-r--r-- | hoogle-test/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/hoogle-test/Main.hs b/hoogle-test/Main.hs index c8cda640..59a98fd0 100644 --- a/hoogle-test/Main.hs +++ b/hoogle-test/Main.hs @@ -9,7 +9,8 @@ import Test.Haddock checkConfig :: CheckConfig String checkConfig = CheckConfig - { ccfgRead = \_ input -> Just input + { ccfgRead = Just + , ccfgClean = \_ -> id , ccfgDump = id , ccfgEqual = (==) } |